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INFORMATICA BASICA 



ARQUITECTURA 

DE LOS ORDENADORES 



N este tema vamos a 
intentar conocer 
Mmm cómo es por dentro 

un ordenador, punto 
■■■ I de trascendencia 
fundamental para el 
posterior desarrollo 
de cualauier aplica- 
ción obteniendo su máximo rendimiento. 

Fundamentalmente un ordenador está 
compuesto por dos partes: 

— La unidad central de proceso, que 

abreviadamente se conoce por las siglas 
CPU o UCP, según se utilicen las inglesas 
o las castellanas. Esta parte es la que 
constituye el verdadero "centro de tra- 
bajo" del ordenador, ya que en ella se 
ejecutan los programas. 



— Las unidades periféricas, que son 

dispositivos que tiene el ordenador para 
comunicarse con su entorno, los medios 
por los que se proporciona información 
al ordenador y aquéllos por los que el or- 
denador suministra los resultados de los 
programas. También suelen considerarse 
como unidades periféricas los distintos 
dispositivos de almacenamiento secun- 
dario de los cuales se hablará más ade- 
lante. 

Profundizando un poco más en el inte- 
rior del ordenador veamos de qué partes 
está compuesta la Unidad Central de Pro- 
ceso. Para ello vamos a hacer una ana- 
logía entre el funcionamiento del orde- 
nador y el de una oficina en la que se 
ejecutan tareas administrativas (ver figu- 
ra 1). 




La oficina de la que hablamos está si- 
tuada en una habitación en la que sólo 
hay un empleado. El trabajo de cada 
mañana le llega por una ventanilla de re- 
cepción por la que recibe diariamente 
los albaranes que contienen una lista de 
pedidos. El tratamiento que se da a cada 
albarán dependerá de ciertas normas 
que le han sido previamente detalladas 
"programando" las operaciones a reali- 
zar. Como útiles de trabajo, el empleado 
dispone de un tablero en el que va colo- 
cando las normas a seguir en cada caso, 
la lista de precios para cada cliente y la 
lista de descuentos, y, para las operacio- 
nes aritméticas que tenga que hacer, 
una calculadora. 

En el proceso de facturación el em- 
pleado realiza los siguientes pasos: 

— Lee cuidadosamente la lista de ins- 
trucciones que figuran en el tablero, eje- 
cutando una detrás de otra todas las ins- 
trucciones. 



— Con las normas a seguir y los datos 
necesarios para realizar la facturación 
realiza las operaciones aritméticas de 
cálculo de precios y descuento. 

— Con los datos y los resultados obte- 
nidos rellena el documento de facturación 
y lo deposita en la ventanilla de salida. 

Estas operaciones se repiten tantas ve- 
ces como haga falta hasta teminar con 
el último albarán y su factura correspon- 
diente. 

Cuando el volumen de trabajo sea tan 
grande que ocupe todo el espacio del 
tablero será necesario que el empleado 
vaya guardando los documentos en al- 
guna parte. Para ellos dispone de un ar- 
chivo fuera de la oficina en una habita- 
ción separada. 

Una vez visto este ejemplo de trabajo 
será más fácil entender el funcionamien- 
to y las distintas partes del ordenador. En 
la figura 2 vemos representados los dis- 
tintos elementos: 
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— Los dispositivos de entrada/salida 

del ordenador corresponderían en nues- 
tro ejemplo a las dos ventanillas que co- 
munican la oficina con el exterior. Por la 
que le llegan al empleado los albaranes 
sería "el dispositivo de entrada de da- 
tos", y por la que él va entregando las 
facturas actualizadas sería "el periférico 
de salida" del ordenador. 

— El director de la empresa, encarga- 
do de determinar las órdenes que tiene 
que ejecutar el empleado a la hora de 
calcular las facturas, y controlar si dicha 
ejecución ha sido bien realizada, es el 
equivalente al elemento U.C. o unidad 
de control. 

— La pequeña calculadora utilizada 
para los cálculos es lo que en términos 
de arquitectura se denomina unidad arit- 
mético-lógica. 

— El tablero en el que se van colocan- 
do tanto las acciones a seguir como los 
datos que van siendo obtenidos es el ele- 
mento M.C., o memoria central donde se 
almacenan los programas y datos. Esta 
memoria tiene normalmente una capaci- 
dad finita, insuficiente para almacenar to- 
dos los datos. 

— Cuando los documentos no cabían 
en la oficina se almacenaban fuera de 
ella. En el caso del ordenador éste alma- 
cenamiento secundario es lo que consti- 
tuye la memoria secundaria y serán nor- 
malmente discos magnéticos, cintas, 
etcétera. 

En resumen, los órganos básicos de un 
ordenador son: 

— La unidad central de proceso, com- 
puesta por: 

• La unidad de control. 

• La unidad aritmético-lógica. 

• La memoria central. 

— Los dispositivos periféricos: 

• De entrada/salida. 

• De almacenamiento secundario. 

Una vez conocido el "interior" de un or- 
denador vamos a ver cómo funciona más 
detalladamente cada una de sus partes. 



US Unidad central de proceso 

La unidad de control 

Como vimos anteriormente, la U.C. es 
el órgano "más inteligente" del ordena- 
dor, que se encarga de dirigir y contro- 
lar cada una de las acciones que se eje- 
cutan en él. Es decir: 

— Analiza e interpreta las instruccio- 
nes del programa que se está ejecutan- 
do. 

— Dirige el funcionamiento de las dis- 
tintas partes del ordenador mediante ór- 
denes dirigidas a las mismas controlando 
su actuación. 

Para saber qué operaciones se tienen 
que realizar se habrá cargado previa- 
mente en la memoria del ordenador el 
correspondiente programa. Una vez he- 
cho esto, los pasos que sigue la U.C. son 
los siguientes: 

— Extrae de la memoria la instrucción 
a ejecutar. Para ello existe en la máqui- 
na un "apuntador" que señala cuál es la 
instrucción siguiente. Este "apuntador" es 
un registro llamado contador de progra- 
ma, que contiene la dirección de memo- 
ria donde se encuentra esta instrucción. 
Cuando se extrae, el P.C. (abreviatura de 
siglas inglesas) se Incrementa para 
apuntar a la dirección de la siguiente ins- 
trucción del programa. 

— Una vez extraída se coloca en el lla- 
mado registro de instrucción que consta 
de dos partes: una, que contiene el có- 
digo de operación que identifica la ope- 
ración a ejecutar (suma, resta...) y la se- 
gunda, que contiene la dirección en la 
que está almacenado el operando. 

— Si la operación identificada es de 
tipo aritmético se ordena a la U.A.L. que 
la realice. 

— Si la operación ha proporcionado 
nuevos datos, éstos se almacenan en la 
memoria principal (ver figura 3). 



La unidad aritmética lógica 

La U.A.L. es la parte del ordenador en- 
cargada de efectuar las operaciones 
que indiquen las instrucciones del progra- 
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Parles de la unidad de control. 

ma. Las operaciones que puede realizar 
esta unidad son de tipo: 

— Aritmético: suma, resta, multiplica- 
ción, división. 

— Lógicas: comparación, negación... 

Estas operaciones se realizan sobre da- 
tos o informaciones que previamente 
han sido almacenados en memoria, y 
nunca podrán efectuarse sobre más de 
dos operandos, de manera que si hay 
que hacer la suma de tres cantidades 
será necesario sumar de dos en dos, te- 
niendo, por tanto, dos sumas. 

Los pasos a seguir en la U.A.L. para rea- 
lizar operaciones son: 

— Cargar el primer operando en el 
acumulador (registro de almacenamien- 
to temporal). 

— Realizar la operación con el segun- 
do operando y el contenido del acumu- 
lador. 

Cargar el contenido del acumulador 
en la dirección del resultado. 

Para poder hacer todo esto se debe 
proporcionar a la U.A.L. los siguientes da- 
tos: 

— Código de operación, que Indique 
la operación a efectuar. 

— Dirección de la célula en la que se 
encuentra almacenado el primer ope- 
rando. 

— Dirección del segundo operando. 

— Dirección de la célula en la que se 
almacenará el resultado. 

Podemos ver más detalladamente el 
funcionamiento de la unidad aritmético 
lógica en la figura 4. 




W~j Unidad aritmético-lógica. 

Memoria central 

La memoria central del ordenador es el 
elemento que se encarga de almacenar 
datos y programas (información en gene- 
ral). Por tanto, la memoria puede consi- 
derarse como un órgano pasivo en el 
que se: 

— Introduce información ("escribir en 
memoria"). 

— Extrae información ("leer en memo- 
ria"). 




Memoria central. 

La memoria está constituida por un 
conjunto de celdas ordenadas numéri- 
camente por sus direcciones y que son 
capaces de albergar un dato o una ins- 
trucción. Para poder acceder al conteni- 
do de una celda de memoria o escribir 
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algo en ella la memoria dispone de dos 
registros: 

— Registro de dirección de memoria: 
contiene en un momento dado la direc- 
ción de la celda que se trata de buscar. 

— Registro de Información de memo- 
ria: en él deposita la memoria el conte- 
nido de la celda seleccionada en el 
caso de una operación de lectura, o 
bien contiene una información para que 
sea depositada en la celda selecciona- 
da en el caso de escritura. 

Según vaya a efectuarse una opera- 
ción de lectura o de escritura, se segui- 
rán los siguientes pasos: 

Lectura: 

— Almacenar la dirección de la celda 
en la que se encuentra la información en 
el registro de dirección. 

— Cargar en el registro de Intercam- 
bio la información contenida en la celda 
apuntada por el registro de dirección. 

— Transferir el contenido al registro de 
la CPU que corresponda. 

Escritura: 

— Transferir al registro de intercambio 
la información. 

— Almacenar la dirección de la celda 
receptora de información. 

— Cargar el contenido de Intercam- 
bio en la celda apuntada por el registro 
de dirección. 



Una propiedad de la memoria central 
es que cuando se "grabe" en una celda 
la información, automáticamente queda 
destruida la información que contuviese 
anteriormente. No ocurre esto, evidente- 
mente, al leer el contenido de una cel- 
da, que consiste únicamente en hacer 
un duplicado de la Información que se- 
guirá permaneciendo en dicha celda. 



Dispositivos periféricos 

Podemos hacer una clasificación en 
dos grandes grupos: 

— Los que se encargan del intercam- 
bio de información entre el ordenador y 
el exterior; y 

— Los dispositivos de almacenamien- 
to de grandes volúmenes de informa- 
ción. 

Dentro del primer grupo podemos dis- 
tinguir los que se encargan de introducir 
información al ordenador, que serían los 
de entrada. De salida serían aquéllos por 
los cuales el ordenador proporciona in- 
formación. Normalmente la información 
que introducimos al ordenador no es di- 
rectamente legible por él, por lo que hay 
que "transcribir" dicha información a un 
sistema legible por él (es decir, ceros y 




unos) mediante la función de codifica- 
ción; análogamente, será necesario rea- 
lizar la operación contraria, llamada de- 
codificación para que los resultados de 
los programas ya ejecutados sean inteli- 
gibles al hombre. 

Como dispositivos de este tipo pode- 
mos citar, como más conocidos: 

— Teclado: dispositivo de entrada. 

— Pantalla, Impresora: dispositivos de 
salida. 



En cuanto al segundo grupo menciona- 
do, también llamado "memoria externa", 
se encarga de almacenar los datos del 
ordenador que necesitará recuperar en 
cualquier momento y que en un instante 
dado no cupieron en la memoria interna 
del ordenador. 

Dentro de este grupo están los conoci- 
dos discos, disquetes, cintas magnéticas, 
etcétera. 




~1 MAQUINA 6502 

(COMMODORE 64) 



INTRODUCCION 



I tuviéramos que defi- 
nir el microprocesa- 
dor 6502 de forma rá- 
pida y sencilla.diría- 
mos que se trata de 
una CPU integrada en 
una sola "pastilla". Su 
esquema responde 
al dibujo de la figura y a continuación ve- 
remos su funcionamiento básico. 
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Su funcionamiento 



El microprocesador 6502 funciona de 
la siguiente manera: contiene un juego 
de instrucciones codificadas con 8 bits 
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aue entiende y es capaz de ejecutar. Así, 
Dor ejemplo, hay una Instrucción que 
consiste en traer un dato de una determi- 
nada posición de memoria a uno de los 
■eaistros internos del 6502. Esta Instruc- 
ción tendrá un código de 8 bits y cuan- 
do se la mandemos al microprocesador, 
éste lo decodificará y realizará la opera- 
ción. 

Para obtener una instrucción (su códi- 
go), el microprocesador coloca en el bus 
de direcciones (16 bits) la dirección de 
memoria donde se encuentra dicho có- 
digo y espera a que la memoria le con- 
teste colocándolo en el bus de datos (8 
Dits). Los controladores de los buses de 
datos y de direcciones son los encarga- 
dos de indicar al microprocesador cuan- 
do pueden mandar datos o tienen datos 
oreparados para ser leídos. 

Una vez que el 6502 tiene el código de 
la instrucción que debe ejecutar, lo guar- 
da en el registro de instrucciones y el de- 
codificador de instrucciones se encarga 
ae mandar por sus líneas de salida las ór- 
denes necesarias para realizar lo que re- 
quiera la Instrucción. 



Los registros del 6502 



Con lo que hemos visto hasta ahora se 
-.os plantea una pregunta: ¿Cómo sabe 
e; microprocesador en qué dirección de 
memoria se encuentra la instrucción que 
cebe ejecutar? 

El contador de programa (PC), uno de 
os registros del 6502, nos soluciona este 
gobierna. El PC es un registro que con- 

• ene la dirección de la Instrucción que 
debe ejecutar el microprocesador en 
cada momento. Todas las Instrucciones 
aue queramos que el 6502 ejecute con- 
secutivamente (un programa) deberán 
encontrarse en posiciones de memoria 
consecutivas. De esta forma el PC, cada 

• ez que obtiene un código de Instrucción 
aumenta en uno para contener la dlrec- 
z ón del siguiente byte que se debe leer 
ce memoria. 

Otros registros importantes del 6502 
son: 

— El acumulador. Podríamos decir que 
es un registro "comodín" que utiliza el 



6502 para realizar gran parte de las ope- 
raciones. Así, hay muchas operaciones 
que sólo pueden realizarse cuando el 
operando o alguno de ellos se encuen- 
tra en el acumulador. Esto nos ahorra te- 
ner que especificar en muchas instruc- 
ciones los operandos porque ya sabe- 
mos que se refiere al número guardado 
en el acumulador. 

— El puntero de pila (S). Es un registro 
que contiene la dirección de memoria 
de la "cima" de ía pila. La pila es un 
conjunto de direcciones de memoria 
consecutivas donde guardamos datos 
con la característica de que el último 
dato introducido será el primero en sa- 
car. La "cima" de la pila será precisa- 
mente la dirección del último dato intro- 
ducido. Cuando se Introduce un dato se 
aumenta en 1 el puntero de pila y cuan- 
do se saca un dato se disminuye en 1. 
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— El registro de estado <P). Es un regis- 
tro distinto de los demás. No contiene un 
número codificado con 8 ó 16 bits, como 
los anteriores, sino que tiene 8 bits cada 
uno, con un significado distinto. Cada 
uno de los bits pasará de 0 a 1 cada vez 
que en el resultado de una operación se 
produzca alguno de los casos que re- 
presenta cada bit: resultado negativo, 
rebosamiento en una operación aritméti- 
ca, cero, acarreo en una suma, etc. De 
todos los bits del registro representados 
en la figura son el 0, 1, 6, 7 los que más 
nos van a interesar al comenzar a dar 
nuestros primeros pasos con la progra- 
mación del 6502. 
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Los bits del registro de estado nos sir- 
ven para realizar instrucciones condicio- 
nales según el valor de alguno de los bits, 
lo que nos Indicará lo que haya ocurrido 
en la última instrucción. Existen en el jue- 
go de instrucciones del 6502 algunas 
que consisten en realizar algo (normal- 
mente un salto a otra dirección de me- 
moria) únicamente cuando se cumpla 
que alguno de los bits del registro de es- 
tado esté a 1 




Rebosamiento 

Resultado 
negativo 



Parador 
programa 
Sin Modo 
usar decimal 

El registro P 



También existe el registro índice (I), 
que veremos a continuación, al estudiar 
los modos de direccionamlento. 

Los bits de cada registro serán, visto lo 
anterior, los siguientes: 

— Acumulador (registro de datos): 8 
bits. 

— Puntero de pila (registro de direc- 
ciones): 16 bits. 

— Registro de estado: 8 bits. 

— Contador de programa (registro de 
direcciones): 16 bits. 



Las instrucciones del 6502 



Como ya hemos dicho anteriormente, 
las Instrucciones del 6502 son códigos de 
8 bits. Aquéllas que necesiten algún tipo 
de operando llevarán a continuación del 
byte de la instrucción uno o varios bytes 
con los operandos correspondientes. Así, 
una instrucción que sea sumar un valor al 



acumulador, a continuación del byte 
con el código de Instrucción deberá lle- 
var otro byte con el valor que hay que su- 
mar. El PC deberá tener en cuenta este 
tipo de Instrucciones y leer después del 
código los bytes de datos que conten- 
gan. Cuando programamos en lenguaje 
máquina del 6502 normalmente se escri- 
ben los bytes mediante su codificación 
en hexadecimal (8 bits = 2 cifras hexade- 
clmales). 




Métodos de 
direccionamiento 



Las instrucciones del 6502 nos permiten 
varios sistemas de direccionamiento: 

— Direccionamiento inmediato. El 

dato viene en un byte a continuación del 
byte de instrucción. 

— Direccionamiento absoluto. El dato 
está en la dirección de memoria que se 
introduce como operando en los dos 
bytes siguientes al de la instrucción. 

— Direccionamiento de página cero. 

Es como el absoluto, pero suponiendo 
que el primer byte de la dirección es 00, 
por lo que la instrucción únicamente lle- 
vará un byte con la segunda parte de la 
dirección. 

— Direccionamlento Indexado. A la di- 
rección que se introduce en los dos bytes 
siguientes a la instrucción hay que sumar- 
le el contenido del registro indice (I), de 
8 bits, para obtener la dirección donde 
se encuentra el dato. 

— Direccionamlento Indirecto. En los 

dos bytes siguientes a la Instrucción se 
encuentra la dirección donde está la di- 
rección donde se encuentra el dato. Esos 
dos bytes indican dos posiciones de me- 
moria por el procedimiento de página 
cero. 

El 6502 posee instrucciones que permi- 
ten obtener cada uno de los datos por 
los distintos medios de direccionamiento 
expuestos. 
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PROGRAMAS EDUCATIVOS 
PROGRAMAS DE UTILIDAD 
PROGRAMAS DE GESTION 
PROGRAMAS DE JUEGOS 




Cambio de 
coordenadas 



Este primer progra- 
ma, aue sirve para to- 
dos los ordenadores, 



es una de las más útiles rutinas para cual- 
auier estudiante o profesional. Por sí mis- 
ma sirve para poco, pero unida a tus pro- 
pios programas puede serte de mucha 
ayuda. 



CAMBIO DE COORDENADAS 



100 REM ****************************************************************** 

101 REM *********** CAMBIO DE COORDENADAS DE RECTANGULAR A ************** 

102 REM *********** POLAR Y VICEVERSA ************** 

103 REM ****************************************************************** 

104 REM 

105 REM ****************************************************************** 
10.6 REM *************** POR JUAN MANUEL GUTIERREZ LE i TON *************** 

107 REM ****************************************************************** 

108 REM 

109 REM ****************************************************************** 

110 REM *************** <c> EDICIONES SIGLO CULTURAL, 1987 *************** 

111 REM ****************************************************************** 

112 REM 

113 CLS 

114 LOCATE 12,20 

115 INPUT "de rectangular a polar <S/N>"}0» 

116 IF 0*»"s" OR 0*="S" THEN GOTO 119 

117 IF 0»«"N" OR 0*="n" THEN GOTO 130 

118 GOTO 113 

119 CLS 

120 INPUT "a=";A 

121 INPUT "b=";B 

122 LET M-SDR<Á-2+B"2) 

123 IF A=0 THEN IF B<0 THEN LET C— 90iG0T0 129 

124 IF A=0 THEN IF B>0 THEN LET C=90i GOTO 129 

125 IF A<0 THEN IF B-0 THEN LET C=1B0:G0T0 129 

126 LET C=ATN(B/A) 

127 IF A<0 THEN IF B<0 THEN LET C=C-180:G0T0 129 

128 IF A<0 THEN IF B>0 THEN LET C"=C<- 180: GOTO 129 

129 PRINT M;"C"(Cr."a":60T0 138 
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133 LET A-M*COS<C> 

134 LET M-M*S1N(C) 

135 IF B<0 THEN PRINT A ; " - ( " ; ABS < B ) ; " ) .i " : BOTO 138 

136 IF B>0 THEN PRINT A; " + " s Bi "j " : BOTO 138 

137 PRINT A; " + O j " 

138 LOCATE 12,20 

139 PRINT "pul»» un* tecla para continuar" 

140 AÍ-INKEY*: IF A*-"" THEN 140 

141 CLS 

1 42 LOCATE 1 , 1 

143 PRINT "quiere sequir (S/N)"¡ 

144 INPUT A* 

145 IF AS-"m" OR A»-"B" THEN BOTO 100 

146 CLS 

147 PRINT "ADIO S" 

148 PRINT " " 

149 PRINT 

150 PRINT 

151 PRINT 

152 PRINT 




El programa puede funcionar perfecta- 
mente sin cambios en el IBM pe, xt y at, 
en todos los compatibles de IBM y en el 
AMSTRAD. Para el resto de los ordenado- 
res te propongo las siguientes modifica- 
ciones. 

COMMODORE: 

113 PRINT CHR$( 147) 

114 POKE 214,12:POKE 211,19 
119 PRINT CHR$( 147) 

130 PRINT CHR$( 147) 

138 POKE 214,12:POKE 211,19 

140 GET A$:IF A$="" THEN GOTO 140 

141 PRINT CHR$( 147) 

142 POKE 214,l:POKE 211,0 
146 PRINT CHR$( 147) 

MSX: 

114 LOCATE 20,12 
138 LOCATE 20,12 
142 LOCATE 1.1 

SPECTRUM: 

114 PRINT AT 12,2; 
138 PRINT AT 12,2; 
142 PRINT AT 0,0; 

La función de este programa es pasar 
de coordenadas polares a rectangulares 
y de rectangulares a polares. Al principio 
del programa (línea 1 15) se pregunta al 
usuario cuál de las dos cosas quiere ha- 
cer. 




Notas sobre el programa 1 



En el caso de que utilices esta rutina en 
uno de tus programas, esta línea la ten- 
drás que quitar, y llamar a la línea 119 
para pasar de coordenadas rectangula- 
res a polares, o a la línea 130 para pasar 
de polares a rectangulares. 

Si vas a utilizar este programa como 
una rutina de tus programas tendrás que 
hacer las siguientes modificaciones: 

1. Quitar el INPUT de la línea 1 15, así 
como las líneas 1 16 y 117, como ya he- 
mos dicho arriba. 

2. Quitar las líneas 119, 1 20 y 1 2 1 . Los 
valores de A y B tendrás que darlos por 
programa. 

3. Quitar las líneas 129 y 130. El resul- 
tado del programa se te devuelve en las 
variables numéricas M y C. 

4. Quitar las líneas 131 y 132. Si eliges 
pasar de coordenadas polares a rectan- 
gulares, los valores de M y de C tendrás 
que darlos por programa. 

5. Quitar las líneas que van desde la 
135 hasta el final del programa. El resul- 
tado de la operación se devuelve en A y 
en B. 

6. Tendrás que poner en alguna par- 
te del programa un RETURN para que, 
cuando termine el cálculo, se devuelva 
el control al programa principal. 




M Awari 

i re juego de mesa (o de suelo) es ori- 
y-ario del antiguo Egipto. También se le 
::-cce con el nombre de WARI o MAN- 
CAN A. Los africanos dicen aue es un «JUE- 
3-0 DE HOMBRES», pero también pueden 



jugar a el las mujeres, y de hecho, cuan- 
do no están sus maridos, juegan. 

La versión aue proponemos aauí es un 
poco más sencilla aue la aue se juega 
en la realidad. Esto es así para no hacer 
el programa más largo de lo aue ya es y 
para aue las reglas del juego no sean tan 
complicadas. 



AWARI 



10 REM 

11 REM 

12 REM 

13 REM 

14 REM 

15 REM 

16 REM 

17 REM 
IB REM 

19 REM 

20 REM 

21 REM 



************************************************** 



** 
** 
** 
»* 
** 
** 
** 
** 
*» 
** 
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ARR 



r 1 1 1 1 
i 
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i 
i 

1 1 1 1 1 



»* 
** 
»» 
** 
** 

#» 
** 
#» 
** 



************************************************** 



************************************************************** 
************************************************************** 

***** REALIZADO POR FRANCISCO MORALES GUERRERO ********* 

************************************************************** 

************************************************************** 
************************************************************** 
***** <c> EDICIONES SIGLO CULTURAL, 1987 ********* 

************************************************************** 



22 REM 

23 REM 

24 REM 

25 REM 

26 REM 

27 REM 

28 REM 

29 REM 

30 REM 

31 REM 

32 REM 

100 LET N«0 

101 DIM B(13):DIM G(13):DIM F(50> 

102 CLS 

103 PRINT "****************************************" 

104 FOR 1=1 TO 17 

105 PRINT "*";TAB<40> ; "*" 

106 NEXT I 

107 PRINT "**************************V*************" 

108 GOSUB 306 

109 LOCATE 16,3:PRINT " <c> Ed. Siglo Cultural" 

110 FOR I-l TO 2000 

111 NEXT I 

112 LOCATE 12,3 

113 PRINT "Quieres ver las Instrucciones S/N " 

114 LET A*=INKEY*:IF A*»"" THEN GOTO 114 

115 IF A*="n" OR A*="N" THEN GOTO 118 

116 IF A»<>"«" AND A*<>"S" THEN GOTO 112 

117 GOSUB 277 

118 CLS 

119 GOSUB 306 

120 LOCATE 24,1 

121 FOR 1=1 TO 4 

122 PRINT 

123 NEXT I 

124 LOCATE 6, 1 1 PRINT "=-=——————»-——-— 

125 PRINT 

126 PRINT 

127 LET E»0 

128 FOR 1=0 TO 12 

129 LET B(I>=3 

130 NEXT I 

131 LET C=0 

132 LET F(N)=0 

133 LET BU3>»0 

134 LET B(6)=0 

135 GOSUB 206 

136 LOCATE 16,1 

137 PRINT " 

138 LOCATE 16,1 

139 PRINT "MUEVES TU " ; : GOSUB 174 
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142 IF E=0 THEN GOTO 159 

143 LOCATE 16,1 

144 PRINT 11 
143 LOCATE 16,1 

146 PRINT "MI MOVIMIENTO ES " 5 

147 GOSUB 240 

148 IF E=0 THEN GOTO 159 

149 IF M-H THEN PRINT "," i i GOSUB 240 

150 FOR 1=1 TO 1500 

151 NEXT I , 

152 IF E>0 THEN GOTO 135 

153 LOCATE 16,1 

154 PRINT 11 " 

155 LOCATE 16,1 

156 PRINT "PULSA UNA TECLA PARA VER MI MOVIMIENTO" 

157 LET A*=INKEY*lIF A*»"" THEN GOTO 157 

158 IF E>0 THEN GOTO 135 

159 PRINT 

160 FOR 1-1 TO 1500 

161 NEXT I 

162 LOCATE 16,13 

163 PRINT " 

164 PRINT "FIN DEL JUEGO. " i PRINT 

165 LET D=B(6)-B<13> 

166 IF D<0 THEN PRINT "TE HE GANADO POR ";-Ds" PUNTOS" : GOTO 315 

167 LET N=N+1 

168 IF D=0 THEN PRINT "HEMOS EMPATADO" : GOTO 315 

169 PRINT "ME HAS GANADO POR " ; D; "PUNTOS" : GOTO 315 

170 LOCATE 16, 1 

171 PRINT " 

172 LOCATE 16,1 

173 PRINT "MUEVE OTRA VEZ "5 

174 INPUT M 

175 IF M<7 THEN IF M>0 THEN LET M=M-1:G0T0 188 

176 LOCATE 16, 1 

177 PRINT " 

178 LOCATE 16, 1 

179 PRINT " 

180 LOCATE 16, 1 

181 PRINT "MOVIMIENTO NO PERMITIDO" 

182 BEEP: BEEP 

183 FOR 1=1 TO 1000 

184 NEXT I 

185 LOCATE 16,1 

186 PRINT " 

187 GOTO 170 

188 IF B<M>=0 THEN GOTO 179 

189 LET H=6 

190 GOSUB 192 

191 GOTO 206 

192 LET K=M 

193 GOSUB 227 

194 LET E=0 

195 IF K>6 THEN LET K=K+7 

196 LET C-C+l 

197 IF C<9 THEN LET F (N) =F (N) *6+K 

198 FOR 1=0 TO 3 

199 IF BU ><>0 THEN GOTO 202 

200 NEXT I 

201 RETURN 

202 FOR 1=7 TO 12 

203 IF B(I)<>0 THEN LET E=lJ RETURN 

204 NEXT I 

205 RETURN 

206 LOCATE 10,1 

207 PRINT 

208 PRINT " ") 

209 FOR 1 = 12 TO 7 STEP -1 

210 GOSUB 224 

211 NEXT I 

212 PRINT: PRINT " "¡ 

213 LET 1=13 

214 GOSUB 224 

215 PRINT " 

216 PRINT B(6) 

217 PRINT " 

218 FOR 1=0 TO 5 

219 GOSUB 224 

220 NEXT I 

221 PRINT 

222 PRINT 



224 IF BIIX10 THEN PRINT " "; 

225 PRINT B ( I > ) 

226 RETURN 

227 LET P=B(M) 

228 LET B(M>=0 

229 FOR P=P TO 1 STEP -1 

230 LET M=M+1 

231 IF M>13 THEN LET M=M-14 

232 LET B(M)=B<M>+1 

233 NEXT P 

234 IF B<M>=1 THEN IF M<>6 THEN IF M<>13 THEN IF B(12-M)<>0 THEN BOTO 236 

235 RETURN 

236 LET B<H)=B<H)+B<12-M)+1 

237 LET B(M)-0 
23B LET BU2-M>-0 

239 RETURN 

240 LET D=-99 

241 LET H»13 

242 FOR 1-0 TO 13 

243 LET Q<I)=B<I> 

244 NEXT I 

245 FOR J-7 TO 12 

246 IF B<J>=0 THEN GOTO 269 

247 LET Q-0 
24B LET M=J 

249 GOSUB 227 

250 FOR 1=0 TO 5 

251 IF B(I)=0 THEN GOTO 257 

252 LET L=B(I>+I 

253 LET R=0 

254 IF L>13 THEN LET L=L-14iLET R=1:G0T0 254 

255 IF B(L)=0 THEN IF L<>6 THEN IF L<>13 THEN LET R=B<12~L>+R 

256 IF R>Q THEN LET 0=R 

257 NEXT I 

258 LET Q-B(13)-B(6)-D 

259 IF OB THEN GOTO 265 

260 LET K=J 

261 IF K>6 THEN LET K=K-7 

262 FOR 1=0 TO N-l 

263 IF F<N)*6+K=INT(F<I)/6'M7-C)+. 1) THEN LET Q=<3-2 

264 NEXT I 

265 FOR 1=0 TO 13 

266 LET B<I)=G<I) 

267 NEXT I 

268 IF Q>=D THEN LET A=J i LET D=Q 

269 NEXT J 

270 LET M=A 

271 PRINT CHR*<42+M>: 

272 BOTO 192 

273 FOR 1=0 TO N-l 

274 PRINT B(I) 

275 NEXT I 

276 END 

277 REM 

278 REM »»*»»*»»*»*#»»*»* 

279 REM * INSTRUCCIONES » 

280 REM ***»#»»**##*»##*» 

281 REM 

282- CLS 

283 PRINT TAB ( 14) ) " INSTRUCCIONES" 

284 PRINT TAB<13> i » " 

285 PRINT 

286 PRINT " El juego del AWARI (también llamado WARI o MANCALA) es muy antigu 
o, tanto que ya se practicaba en el antiguo egipto." 

287 PRINTs PRINT 11 La forma de jugar es la siguiente:" 

288 PRINT 

2B9 PRINT " El tablero esta dividido en seis casi- lias en cada cara. Los movimi 
entos se realizan cogiendo todas las fichas de" 

290 PRINT "una cierta casilla que, no este vacia, yrepartiendo dichas fichas por 
las casi- lias contiguas hacia la derecha, ponien-" 

291 PRINT "do una en cada casilla." 

292 PRINT 

293 PRINT " Cada torno puede ser de una o dos juga-das. Se realizara una segunda 
jugada cuando ninguna de las fichas pasa al la-do del oponente." 

294 PRINT SPRINT "PULSA UNA TECLA" ; 

295 LET A*=INKEY*:IF A*-"" THEN SOTO 295 

296 CLS 

297 PRINT " Para ganar hay que conseguir apropiarsede las fichas del oponente. E 
sto se con-sigue cuando después de un movimiento, la ultima ficha cae en un cas 
i 11er o que" 

298 PRINT "tiene solo una, dos o tres fichas. Todasl as fichas de dicho cubilete 
son comidas" 

299 PRINT 
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300 PRINT 11 El juego termina cuando una de las ca- raa del tablero esta vacia. 

301 PRINT 

302 PRINT "PULSA UNA TECLA" 

303 LET A*=INKEY#:IF A*="" THEN BOTO 303 

304 CLS 

305 RETURN 

306 REH *»»»*»*#■*»**#**»»»#*»#### 

307 REM * ROTULO "AMAR I" * 

308 REM »»«##»***#•»*»*#*»*##*«**# 

309 REM 

310 LOCATE 5,5iPRINT » ### # # ##* 

311 LOCATE 6,5:PRINT "# * # # # # » # »" 

312 LOCATE 7,5iPRINT "**•»#* * # # «♦«*♦*♦♦» #" 

313 LOCATE B,5rPRINT "# # tt # # # # # ##»#»" 

314 RETURN 

315 PRINTi PRINT 

316 PRINT " ÍHECHAMOS OTRA PARTIDA? <S/N> «| 

317 LET A*=INKEY*:IF A*-"" THEN GOTO 317 

318 IF A*=""6" OR A*="S" THEN GOTO 11B 

319 IF A*<>"n" AND A*<>"N" THEN GOTO 317 

320 CLS 

321 GOSUB 306 

322 LOCATE 24,1 

323 FOR 1=1 TO 4 



324 PRINT 
















325 NEXT I 
















326 LOCATE 10,1 
















327 PRINT 
















328 PRINT " **»# 
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329 PRINT " * 
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331 PRINT " **»**» 
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333 PRINT " » 
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334 PRINT " » 
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335 PRINT 
















336 PRINT 
















337 END 
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Las reglas del juego son las siguientes: 
Este juego se realiza en una especie de 
tablero como el que se ve en la figura 1 . 
En realidad cada casilla, aunque la lla- 
maremos así, no es tal casilla, sino que 
es un cuenco o un recipiente mediana- 
mente hondo dentro del cual pondremos 
las fichas. 

En la versión para el ordenador hemos 
decidido poner tres fichas en cada reci- 
piente. 

Las dos casillas que están vacías son 
las que almacenarán las fichas que le va- 
yamos comiendo al enemigo. Este es el 
objetivo primordial del juego. Pero el jue- 
go no termina cuando nos hemos comi- 
do todas las fichas del contrincante, 
pues a veces es imposible saber cuál son 
las propias y cuáles las del contrincante, 



sino que lo hace cuando una de las ca- 
ras se ha quedado sin fichas. En ese mo- 
mento se ve la diferencia de fichas que 
hay entre los dos jugadores y gana el 
que más tiene. 

Para mover las fichas sólo hay que de- 
cir el número de casilla sobre la que que- 
remos actuar. Una vez sabido esto, se re- 
parten todas las fichas que haya en di- 
cha casilla entre las casillas contiguas 
por la derecha y poniendo una ficha en 
cada casilla. 

Si nos fijamos en la figura 1, veremos 
que en la posición a, en la casilla 3 hayl 
tres fichas. Si movemos desde la casilla 
3, ésta se quedará vacía y se pondrá una j 
ficha en la 4, otra en la 5 y otra en la 6. ] 
Con ello estas tres casillas pasarán a te- , 
ner 4 fichas. 




6 5 4 3 2 1 



-Lado del ordenador 



r— 3 



■ o] — Tu Casilla almacén 
1 2 3 4 5 6 —Tu lado 

— Casilla almacén 
del ordenador 



Tablero de Awarl. 



5e come una ficha del contrincante 
r.ando, al hacer un movimiento, se cam- 
r a de lado (se pasa al lado del contrin- 
:ante) y la última de las fichas a colocar 
rae en una casillaque no esté vacía y 
3je tenga como máximo tres fichas. El ju- 
gador que haga dicha jugada cogerá to- 
: : = las fichas de dicho cuenco y las pon- 
r-á en el cuenco de recuento. 

Cabe la posibilidad de hacer dos Juga- 
ras seguidas. Esto sucede cuando la úl- 
- -a ficha ha caído en el primer casillero 
reí contrincante. 




Ejemplo de ejecución del programa Awarl. 

Esfe programa funciona en el IBM pe, xt, 
£ Y compatibles, así como en el AMS- 
<AD. Para los demás ordenadores os da- 
-C3 las variaciones: 



COMMODORE: 

102 PRINTCHR$(147) 

109 POKE 214,16:POKE 211,2:PRINT "(c) 

Ed. Siglo Cultural 

112 POKE 214,12:POKE 211,2 

1 14 GET A$:IF A$="" THEN GOTO 1 14 

120 POKE 214,23:POKE 211,0 

124 POKE 214,6:POKE 211,0:PRINT 



136 POKE 214,16:POKE 21 
138 POKE 214,16:POKE 21 
143 POKE 214,16:POKE 21 
145 POKE 214,16:POKE 21 
153 POKE 214,16:POKE 21 
155 POKE 214.16.POKE 21 
157 GET A$:IF A$="" THEN 
170 POKE 214,16:POKE 21 
172 POKE 214,16:POKE 21 
176 POKE 214,16:POKE 21 
178 POKE 214,16:POKE 21 
180 POKE 214,16:POKE 21 
185 POKE 214.16.POKE 21 
206 POKE 214,10:POKE 21 
282 PRINT CHR$(147) 

295 GET A$:IF A$="" THEN 

296 PRINT CHR$(147) 

303 GET A$:IF A$="" THEN 

304 PRINT CHR$( 147) 

310 POKE 214,5:POKE 211 

311 POKE 214,6:POKE 211 

312 POKE 214,7:POKE 211 

313 POKE 214,8:POKE 211 
320 PRINT CHR$( 147) 
326 POKE 214,10:POKE 21 

MSX: 

Lo único que hay que hacer para que 
el programa funcione en el MSX es cam- 
biar el orden de los argumentos de todas 
las sentencias LOCATE. Esto es, si apare- 
ce la instrucción LOCATE 12,1 nosotros 
tendremos que poner LOCATE 1,12. 

La versión para SPECTRUM de este pro- 
grama aparecerá en tomos posteriores. 



Letras en tres dimensiones 
para SPECTRUM 



Este programa es una rutina en CODI- 
GO MAQUINA para el SPECTRUM que nos 
permitirá la impresión en pantalla de 
cualquier mensaje con las letras en tres 
dimensiones. 

La rutina no es reubicable. Esto es, no 
se puede localizar en cualquier parte de 



1,0 
1,0 
1,0 
1,0 
1,0 
1,0 

GOTO 157 

1,0 

1,0 

1,0 

1,0 

1,0 

1,0 

1,0 

GOTO 295 

GOTO 303 

,5 
,5 
,5 
,5 

1,0 
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la memoria, sino sólo en la posición 
64500 de ésta. No es reublcable debido 
a aue tiene saltos absolutos y subrutinas. 



1 POKE 23658,0: Cl-EAR 64499: 
00 SUB 1000 

2 CLS : PRINT AT 10, 1 J INK 6( 
"QUIERES GRABAR EL PROGRAMA S/N" 

3 IF INKEY#="n" THEN GO TO 6 

4 IF INKEY*="s" THEN PRINT A 
T 15, 9 | FLASH lj" PULSA ENTER " I 

PAUSE 10: FOR 1=1 TO 50: NEXT I 
: PAUSE 0: POKE 23736,181: SAVE 
"LETRAS 3-D" LINE 1: GO Tü 6 

5 GO TO 3 

6 CLS : PAUSE 3l FOR 1=0 TO 3 
O: NEXT il PRINT AT 10, 1| INK 5| 
" GRABO EL CODIGO MAQUINA S/N " 

7 IF INKEY*="n" THEN GO TO 9 

990 

8 IF INKEY*="s" THEN PRINT A 
T 15,9; FLASH 1 J " PULSA ENTER "l 

PAUSE 3: FOR 1=1 TO 50: NEXT II 
PAUSE 01 POKE 23736,181: SAVE " 

L. 3-DCODE "CODE 64500,483: GO T 

O 9990 

9 GO TO 7 



10 REM 
POSICION 

23300 



11 REM 
POSICION 

23302 

23303 
23311 
23312 



SIGNIFICADO 
LONGITUD DEL MEN 
SAJE MULTIPLICADO 
POR OCHO. 



SIGNIFICADO 
XSIZE 



YSIZE 

XPOS 

YPOS 



15 PRINT INK 0|AT 20,0)11*1 PO 
KE 23300, LEN M**8 

20 POKE 233 11, XPOS: POKE 23312 
,YPOS 

30 POKE 23302, XSIZE: POKE 2330 
3, YSIZE 

40 INK I: 

RANDOMIZE USR 64500 

50 RETURN 
1000 INK 6: PAPER O: BORDER Ol C 
LS : PRINT AT 0,6| INK 4| 1985 
, Feo. Morales. ": INK 5: PLOT 40 
,165: DRAW 179,0 

1010 INK 6: PRINT • '" ESTE ES UN 
PROGRAMA QUE TE PER-MI TI RA LA C 
RE ACION DE MENSAJESDE CUALQUIE 

R TIPO EN TRES DIMEN-SIONES. " 
1020 PRINT '•" PARA UTILIZARLO S 
OLO HAS DE DAREL MENSAJE A IMPRI 
MIR, LA POBI-CION DONDE QUIERES 

QUE LO IMPRI-MA Y LA ALTURA Y 
ANCHURA EN LAQUE LO QUIERES." 
1030 INK 7: PRINT ""- EL MENSAJ 
E IRA EN M* - LA POSICION EN 
XPOS E YPOS - LA ALTURA Y ANC 
HURA EN YSIZE Y XSIZE RESPECTIVA 
MENTE. " 

1040 PRINT ftO) INK 2¡ FLASH 1 !" 
PULSA UNA TECLA PARA CONTINUAR " 
1050 PAUSÉ O 



1060 INK 6i CLS : PRINT AT 9,9( 
FLASH 1) "CARGANDO DATAS" ; AT 11,6 
! FLASH lj INVERSE lj INK 4j" ES 
PERA UN MOMENTO. " 
1070 PRINT AT 15, 6; INK 5| "CHECK 
SUM = " 

1080 LET CONTA-0: LET P0S=64300: 

RESTORE 7000 
1090 FOR 1=0 TO 482: READ Al POK 
E POS+I.A: LET C0NTA=C0NTA+A| PR 
INT AT 15, 17(C0NTA¡ i NEXT I 
1092 IF C0NTAO40670 THEN GO TO 

6000 

1100 CLS I PRINT AT 10, 0| INK 4| 
"LETRAS 3-D INSTALADO EN LA 6450 

O" 

1110 PRINT AT 12,0) FLASH 1 j "PUL 
SA UNA TECLA PARA DEMOSTRAION" I 

PAUSE O 

1120 LET M*="letras"i REM MENSAJ 

E 

1130 LET XPOS=Oi REM POSICION EN 

X 

1140 LET YP0S=95: REM POSICION E 
N Y 

1150 LET XSIZE=4: REM ANCHURA 
1160 LET YSIZE=lli REM ALTURA 
1170 LET I=2i CLS i GO SUB 10 
1180 LET 1=4: LET M*="3-D ": L 
ET XP0S=39t LET YP0S=40: LET XSI 
ZE=9: LET YSIZE=6: GO SUB 10 
1190 LET 1=5: LET M*="PULSA UNA 
TECLA": LET XP0S=6: LET YP0S=16: 
LET XSIZE=2: LET YSIZE=2: GO SU 
B 10 

1200 PAUSE O: RETURN 
6000 CLS : PRINT INK 4;AT 10, lj 
FLASH 1 ; "ERROR" ; FLASH O;" EN D 
ATAS, PRUEBA DE NUEVO" ; INK 6;AT 
15,9¡ FLASH 1;" PULSA ENTER ": P 
AUSE 3: PAUSE O: 60 TO 20000 
6500 

6510 REM ********************* 
6520 REM ***** DATAS ***** 
6530 REM ********************* 
6540 

7000 DATA 0,217,229,217,58,4,91, 
50,17,91,50,19,91,62,15,50,18,91 
,50,5,91,58,6,91,71 

7005 DATA 5,58,17,71,79,167,129, 
16,252,71,58,15,91,167,128,50,10 
,91 ,58,7,91 ,71 ,5,58, 18 

7010 DATA 91,214,8,79,167,129,16 
,252,71 ,58, 16,91 ,167, 128,50,11 ,9 
1,205,101,252,58,18,91,61,254 

7015 DATA 7,50,18,91,50,5,91,32, 
193,62,15,50,18,91,50,5,91,58,17 
,91,60,42,19,91,189 

7020 DATA 50,17,91,50,4,91,32,16 
9,217,225,217,251 ,201 ,62,0,50, 14 
,91,205,169,253,42,4,91 68 

7025 DATA 77,205,160,252,202,168 
,253,58,6,91 ,71 , 197 ,58 , 10 ,91 , 128 
,79,58, 1 1 ,91 ,71 ,205,229,34, 14 

7030 DATA 0,38,7,91,71,17,255,2 
55,205,186,36, 193, 120,61 ,71 ,254, 
255,32,223, 195, 172,252,205, 170,3 
4 

7035 DATA 71,4,126,7,16,253,203, 
71 ,201 ,58,4,91 ,79,58,5,91 ,60,71 , 
205, 160, 252, 32, 39, 5B, 4 

7040 DATA 91,61,79,38,3,91,71,20 
5,160,252,32,25,58, 10,91 ,79,58, 1 
1,91,71,205,229,34,58,6 



■3 DATA 91,79,38,7,91,71,17,1, 
ZOS, 196, 36, 38, 4, 91, 79, 38, 3, 91, 
1,205,160,232,32 

^OSO DATA 39,38,4,91,60,79,38,5, 
i : ,71 ,203, 160,232,32,23,58,8,91 , 
K .58, 13,91 ,71 ,205,229 

lOSB DATA 34,58,6,91,79,38,7,91, 
17,1,1, 205 , 1 86 , 36 , 38 , 4 , 9 1 , 79 , 
3B. 3, 91 ,60,71 ,203 

7-06O DATA 160,252,32,23,58,8,91, 
— .58,9,91,71,203,229,34,58,6,91 
.79,6,0,17,1,1,203 

7065 DATA 186,36,58,4,91,60,79,3 
3,3,91 ,71 ,205,160,252,32,23,58,1 
2, 91,79,38, 9, 91, 71, 205 

TO70 DATA 229,34,14,0,58,7,91,71 
.17,255,233,203,186,36,58,4,91 ,7 
9, S8, 5, 91 ,60,71 ,205, 160 

7075 DATA 252,40,5,62,1,50,14,91 
.58,4,91 ,60,79,58,5,91,71,205,16 
0,252,40,7,58,14,91 

7080 DATA 60,50,14,91,58,14,91,2 
54,1,40,25,58,8,91,79,58,11,91,7 
1,205,229,34,58,6,91 

-:'83 DATA 79,58,7,91,71,17,1,1,2 
55, 186,36,201 ,58,6,91 ,71 ,58,10,9 
. 128,50,8,91 ,38,7 

7090 DATA 91,71,58,11,91,128,50, 
9,91,58,6,91,135,71,58,10,91,128 
,50, 12,91 ,58,7,91 ,71 

7095 DATA 58,11,91,144,30,13,91, 
201 ,0 

9990 CLS : PRINT AT 0,6j IIMK 4| " 

1985, Feo. Morales. "(f.OjAT 1,9 
t INVERSE lj" LETRAS 3-D "i INK 
5i PLOT 40,165i DRAW 179,0 
9999 INK 3: FOR i =0 TQ 3| PLOT 1 
0+i, 20+li DRAW 0,110-2*ii DRAW 2 
35-2*1,0: DRAW 0,-110+2*1: DRAW 
-235+2*1,0: NEXT li LET l=6i LET 
m*="ADIOS": LET XP0S=25: LET YP. 
0S=40: LET XSIZE=5: LET Y3IZE=10 
i 60 SUB 10: PAUSE O 




.z primero que tenemos que hacer es 
■■reducir el programa por el teclado del 
: :^-ador. Ten mucho cuidado con los 
eros de las líneas DATA para no equi- 
vocarte. De todas maneras el programa 
leva una rutina de comprobación que te 
*á si te has equivocado. 

-la vez que esté el programa en me- 
-t-;a ejecútalo con la sentencia RUN y 
*scera que el ordenador meta el código 
-•¿ajina en su memoria. Una vez hecho 
r:-: -e aparecerá en pantalla una de- 
- rr-ación de lo que es capaz de hacer. 
: _c el programa te pregunte si quie- 
t: abarlo, introduce en tu cassette 



una cinta virgen rebobinada, pulsa a la 
vez las teclas RECORD y PLAY, espera 
unos 10 segundos y pulsa la tecla S del 
SPECTRUM. A continuación se grabará el 
programa en la cinta. 




Una vez que se haya grabado el pro- 
grama el SPECTRUM te preguntará si quie- 
res grabar la rutina en CODIGO MAQUINA. 
Si te interesa hacerlo, sólo tienes que pul- 
sar la tecla S y el ordenador lo hará. 



Notas sobre el programa 3 

Para utilizar esta rutina en tus progra- 
mas sólo tienes que hacer lo siguiente: 

1 . Introducir esta línea al principio del 
programa: 

10 CLEAR 64499:LOAD ""CODE 

2. Introducir esta rutina al final del 
programa: 

9950 PRINT INK 0; AT 20,0;M$:POKE 
23300, LEN M$'8 

9960 POKE 23311, XPOS:POKE 
23312.YPOS 

9970 POKE 23302, XSIZE:POKE 
23303,YSIZE 

9980 INK I : RANDOMIZE USR 64500 
9990 RETURN 

Para usar esta rutina debes de saber 
que: 

— El mensaje a imprimir ha de ir alma- 
cenado en M$. 

— La posición en la pantalla, donde 
aparecerá el mensaje, ha de ir en XPOS 
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y en YPOS. Siendo XPOS la coordenada X 
de la pantalla y YPOS la coordenada Y. 

— La altura del mensaje tiene que ir al- 
macenado en YSIZE. 

— La anchura debe ir en XSIZE. 

— El color tiene que ir en I. 

— Si necesitas efectos de FLASH o de 
BRIGHT, tendrás que ponerlos como una 
instrucción normal antes de llamar a la 
rutina. 






Mensaje de despedida del programa I. 

Este programa empieza en la dirección 
64500 y llega hasta el final de la memo- 
ria. Internamente utiliza la zona interme- 



dia de impresora para almacenar una 
serie de variables. Las más importantes 
son: 

— 23300. En esta dirección ha de ir la 
longitud de la cadena multiplicada por 
ocho. 

— 23302. XSIZE 

— 23303. 'YSIZE 

— 23311. XPOS 

— 23312. YPOS 

El mensaje a imprimir ha de estar impre- 
so en la columna 0 de la línea 20. 

Para llamar a la rutina sólo hay que ha- 
cer: 

RANDOMIZE USR 64500 




Supergráficos 



Este es un programa realmente útil 
para todo programador o usuario. Nos 
servirá para dibujar en la pantalla de 
nuestro ordenador cualquier tipo de di- 
bujo en color o en blanco y negro. Tam- 
bién nos permitirá copiar el contenido de 
la pantalla en la impresora. 

Este programa sólo funciona en los or- 
denadores IBM pe, xt, at y compatibles. 
Para el resto de los ordenadores irá apa- 
reciendo en sucesivos tomos. 
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10 REM »»»#«*»*»«»»«»»#**»*«»»*#*»»»*»»***»***»*»»**»»»**»»»»««»»«**»»**»**»»*** 



12 
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22 REM «i**»*»**»***»**»»»»***»**»»**»*»*»»**»**********»»****»»»****»**»»*»***» 

23 REM 

25 REM ##***#»#»*****»**»#»*«•*»*#»»**»****»*»*******»*********»»****«*»**»****»* 

26 REM »***»#***«#»*»** REALIZADO POR FRANCISCO MORALES GUERRERO *»«**#»**»**»«* 

27 REM »«**»»*##******»#»****»*»»«»»***»*»#*#»*»**»»»»»»***»**»*»*******»*****»» 

28 REM 

30 REM *«»»#**»*#»***»#»»»#»»»»»»»»»***«***»*»*****»»**»»»#»»****»»**»»***»»*»** 

31 REM »«»#*****»#*»#»»*#* <c> EDICIONES SIGLO CULTURAL, 1987 **»»*»»**#»****»*» 

32 REM **#***»»»*»***»**»»*»**»»*****##»»»**»**»«******«*»**»*»»*»»********»**** 

33 REM 

36 REM * INICIALIZ ACION DEL PROGRAMA * 

38 REM 

39 KEY OFF 

40 FOR RT=1 TO 10 

41 KEY <RT) OFF 




44 COLOR 16,1, , ,3 

45 WIDTH 80 

46 LET X-100 

47 LET Y- 100 

48 LET XI -O 

49 LET Y1»0 

50 LET SS-1 

51 DIM A7.U0000) ,87.(10000) ,07.(3000) ,D7.(2000> ,E7.(2000) 

55 GOSUB 173 

56 CLS 

60 LOCATE 21,1. 

61 INPUT "Numero de punto» en X (320 o 640) - ";A 

62 IF AO320 AND AO640 THEN 60 ELSE IF A=320 THEN WIDTH 40iLET 8W=1 ELSE LET SW 
-2 

63 REM 

64 REM **»*»»*#»»*«**»»»»*»*» 

65 REM « PROGRAMA PRINCIPAL » 

66 REM »#»#**»*»*»#»»»»##»*»# 

67 REM 

68 LET PP-0 

69 LET 11=1 

70 COLOR PP.II 

71 CLS 

72 GOSUB 105 

73 QET <0,0>-(319»SW,199> ,B7. 

74 P=POINT(X,Y> : IF POO THEN P1=0 ELSE Pl = l 

75 PSET(X,Y) ,P1 

76 A*=INKEY*:IF Aí="" THEN 76 

77 A=ASC(A*> 

78 IF LEN(A*>=1 THEN 83 

79 IF MID*(A*,2,1)="K" THEN PSET < X , Y) ,P: X=X-SS-SS» <X-SS<0> : GOTO 74 

80 IF MID*<A*,2, 1>="M" THEN PSET ( X , Y) , P: X=X+SS+SS* < X+SS>31 9*SW> : GOTO 74 
91 IF MID*(A*,2,1)="H" THEN PSET < X , Y) , P: Y=Y-SS-SS* ( Y-SS<0) : GOTO 74 

82 IF MID*(A*,2,1)="P" THEN PSET ( X , Y) , P: Y=Y+SS+SS» ( Y+SSM91 ) : GOTO 74 

83 IF A=83 OR A=115 THEN M*-" ESCALA ACTUAL <*"+STR* (SS> +" I 
NTRODUZCA NUEVA ESCALA ( 1-9) ": L0=2: MA*="9" : MI*=" 1 ": GOSUB 129: IF VAL(D*>59 AND D* 
<>"" THEN 83 ELSE SS=VAL(D*> 

84 IF A=80 OR A=H2 THEN PSET (X , Y) , I I : X1=X: Y1=Y: SWW=1 : GOTO 74 

85 IF A=79 OR A=lll THEN PSET (X , Y) ,PP: X1=X : Y1=Y: SWW=2: GOTO 74 

86 IF A=67 OR A=99 THEN L0=2: MA*="4" : MI*="0" : M*= "COLOR" : GOSUB 129: IF VAL(D*)>4 A 
ND D*<>" " THEN 85 ELSE II=VAL(D*) 

87 IF A=76 OR A=108 THEN PSET ( X , Y) , P: GOSUB 105: L INE ( X 1 , Yl ) - ( X , Y) , -I I * <SWW= 1 ) -PP* 
(SWW=2) :X1=X: Y1=Y:G0T0 74 

88 IF A=70 OR A=102 THEN PSET < X , Y) ,P: GOSUB 105: DD=POINT ( X , Y) : FOR I=X TO 319*SW: I 
F POINTd ,Y)ODD THEN DD=POINT ( I , Y) : PAINT ( X , Y) , 1 1 , DD: GOTO 74 ELSE NEXT 1 1 GOTO 74 

89 IF A=27 THEN PSET ( X , Y) , P: GOSUB 111: GOTO 74 

90 IF A=75 OR A=107 THEN PSET (X , Y) ,P: GET (O, O) - (319, 191) , B7.: GOTO 74 

91 IF A=74 OR A=106 THEN PSET ( X , Y) ,P: PUT (0,0) ,B7. , PSET: GOTO 74 

92 IF A-81 OR A=113 THEN PSET (X , Y) ,P: M*=" ( TERMINAMOS EL PROGRAMA ? (S/n) " : MA**" 
z"iMI*="A":L0=2:G0SUB 129: IF D*<>"n" AND D*<>"N" AND D*<>"S" THEN 92 ELSE IF D*= 
"S" THEN 152 

93 IF A=90 OR A=122 THEN PSET ( X , Y) , P: M*= " C BORRAMOS LA PANTALLA ? (S/n ) " . MI*="A" 
:MA*="z":L0=2: GOSUB 129: IF D*<>"N" AND D*<>"n" AND D*<>"S" THEN 93 ELSE IF D*="S 
" THEN CLS: GOTO 74 

94 IF A-68 ÜR A=100 THEN PSET ( X , Y) , P: GOSUB 105: N*="DIRECTORIO" : GOSUB 166:G0SUB 1 
58IPRINT "PULSA UNA TECLA" : A*= INPUT* ( 1 >: GOSUB 111: GOTO 74 

95 IF A»66 OR A=9B THEN PSET ( X , Y ) ,Pi GOSUB 1 05: N*»" BORRAR UN PROGRAMA" : GOSUB 166: 
GOSUB 15B:INPUT "NOMBRE DEL FICHERO = ",A*:KILL A*:GOSUB llliGOTO 74 

96 IF A=82 OR 0=114 THEN PSET ( X , Y) ,Pi GOSUB 105: N*""RENOMBRAR UN PROGRAMA" : GOSUB 
166:G0SUB 158: INPUT "NOMBRE ANTIGUO DEL FICHERO = " , A*: FRINT: INPUT"NOMBRE MODERN 
O DEL FICHERO = ",B*:NAME A* AS B*iGOSUB 111: GOTO 74 

97 IF A»77 OR A=.109 THEN PSET (X , Y) ,P: DFF SEG=&HB800: M*=" NOMBRE PARA GRABAR - "iM 
A*="z":MI*="A":LO-12:G0SUB 129: IF D*="" THEN GOTO 74 ELSE BSAVE D*, O, 16300: GOTO 
74 

98 IF A-78 OR A^-110 THEN PSET ( X , Y) ,Pl DEF SEG'&HBBOOi M*=" NOMBRE PARA GARGAR - ":M 
A*="z":MI*="A"rL0=12iG0SUB 1291 IF D*="" THEN GOTO 74 ELSE BLOAD D*:GOTO 74 

99 IF A=8B OR A=120 THEN PSET ( X , Y) , P: GOSUB 117:L.0CATE 22,1:PRINT "X="|X|" "|"Y- 
" ; Y: LOCATE 23,1:PRINT "PULSA UNA TECLA: "A*=INPUT* < 1 ) :G0SU8 123 

100 IF A=63 THEN PSET ( X , Y) ,P: GOSUB 173 

101 IF (A=87 OR A»119) AND SSW=0 THEN PSET ( X , Y) ,P: X2»X : Y2=Y: SSW=1 : GOTO 74 

102 IF (A=87 OR A=U9) AND SSW=1 THEN PSET ( X , Y) ,Pi BET ( X2, Y2) - ( X , Y) ,D7.: AX = X-X2: A 
Y=Y-Y2:X=X2iY=Y2:GET ( X , Y) - ( X+AX , Y+AY) , EX: SSW"0: GOTO 204 

103 PSET(X,Y) ,P:GOTO 74 

104 REM 

105 REM ********************* 

106 REM * ALMACENA PANTALLA * 

107 REM *******»***»#*»#»»»*# 

108 REM 

109 GET (0,0)-(319»SW,199) ,A7.:RETURN 

110 REM 
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111 REM *»#»#**•»**#*###»»*»»» 

112 REM * RECUPERA PANTALLA * 

113 REM #»»•»»*»«»*»♦»•*»***»#» 

114 REM 

115 PUT ( 0 , 0 ) , AV. , PSET i RETURN 

116 REM 

117 REM #*##****##***nnnnn*x#*w#*######## 

118 REM * ALMACENA 3 LINEAS INFERIORES * 

119 REM *«■»****#***»*»###**#»#»***«»«### 

120 REM 

121 QET <0,160>-(319»SW,199> ,C7.i RETURN 

122 REM 

123 REM «*#**»**»**»«»»*#«•**»#*****•»*»#» 

124 REM » RECUPERA 3 LINEAS INFERIORES * 
123 REM ###»*»*»»**»*»»**#***##»*»«.*###* 

126 REM 

127 PUT (0,160) , CX, PSET i RETURN 

128 REM 

129 REM #####*»*»»*»##*»#»#* 

130 REM » ENTRADA DE DATOS 

131 REM »«*#«»»*«*«»•*»•»»#»« 

132 REM 

133 GOSUB 117 

134 LOCATE 21,1 

135 PRINT SPC(120»SW> ; 

136 LET D*="" 

137 LET L0=0 

138 LOCATE 22,1 

139 PRINT M*¡" : "¡CHR*(29>s 

140 C*=INKEY* 

141 IF C*="" THEN GOTO 140 

142 IF C*=CHR*<8) AND L0>0 THEN LO=LO-1 : D*=LEFT* (D* , LO) : PRINT CHR*<29>:" " ¡ CHR* 
(29) |CHR*(29) ¡ 

143 IF C*-CHR*(13> THEN GOTO 150 

144 IF C*=" » OR C*="." THEN GOTO 146 

145 IF C*>MA* OR C*<MI* THEN 140 

146 PRINT C*¡ "_";CHR*(29) ¡ 

147 LET D*=D*+C* 

148 LET L0=L0+1 

149 IF LOOLO THEN GOTO 140 

150 PRINT " ":GOSUB 123:RETURN 

151 REM 

152 REM *»#•*#*»*##****#*****#»* 

153 REM » SALIDA DEL PROGRAMA » 

154 REM »*»»**»#**»»•»**»»#»♦#»» 

155 REM 

156 GOSUB 117:L0CATE 22,1:PRINT "PULSA C ESCAPE 3 PARA SALIR"iPRINT "OTRA TECLA CO 
NTINUAR" ■ A*-=INPUT* ( 1 ) i IF ASC(A*)=27 THEN CLS:SYSTEM ELSE GOSUB 123iGOT0 74 

157 REM 

158 REM *»##**»**»»*•** 

159 REM » DIRECTORIO * 

160 REM **######»*#### 

161 REM 

162 CLSiLOCATE l,li PRINT N* 5 " DE LA UNIDAD "(D*; 

163 FILES D*+"i».»"iPRINT:PRINT 

164 RETURN 

165 REM 

166 REM »*■»»»*»»*#»*»»#*»»»»*###*» 

167 REM * PEDIR UNIDAD DE DISCOS » 

168 REM »*#♦»#*»#»#•»»»»»*#*»**»#»» 

169 REM 

170 PSET(X,Y) ,P<M*=N*+" DE LA UNIDAD - " i MA*="z " i MI#="A" I L0=2i GOSUB 129i IF LENtD 
*>-2 THEN 170 ELSE IF D*=" " THEN D*="A" 

171 RETURN 

172 REM 

173 REM »»*#*»»»»»»»»*»»» 

174 REM » INSTRUCCIONES * 

175 REM ##*#**»*»»#*»»#»* 

176 REM 

177 GOSUB 105i CLSi LOCATE 1,1>PRINT " COMANDOS DEL PROGRAMA SUPERGRAFICOS. " 

178 PRINTlPRINT "<Q> Finaliza sesión" 

179 PRINT "<P> Dibuja un punto (PSET)" 

180 PRINT "<0> Borra un punto (PRESET) " 

181 PRINT "<L> Traza una linea (LINE)" 

182 PRINT "<X> Visualiza coordenadas" 

183 PRINT "<M> Graba pantalla (SAVE) " 

184 PRINT "<N> Carga pantalla (LOAD) " 

185 PRINT "<K> Graba pantalla en memoria" 

186 PRINT "<J> Carga pantalla de memoria" 

187 PRINT "<ESC> Anula la ultima acción (DEL)" 

188 PRINT "<Z> Borra la pantalla (CLS) " 



189 PRINT "<B> Borra un -fichero <KILL) " 

190 PRINT "<D> Muestra el directorio <FILES) " 

191 PRINT "<R> Renombra un fichero (RENAME) " 1 

192 PRINT "<S> Varia la velocidad del cursor" 

193 PRINT "<C> Cambia color de tinta (COLOR) " 

194 PRINT "<F> Colorea una zona (FILL) " 

195-PRINT "<W> Copia parte del dibujo (WIND) " 

196 PRINT "<?> Muestra esta pantalla" 

197 P.RINT "<2,4,6,B> Mueven el cursor" 

19B PRINT: PRINT " PULSA UNA TECLA" ;: A*=INPUT* ( 1 ) i GOTO 111 

199 REM 

200 REM #####***#**#***■#***#******* 

201 REM * CREACION DE UNA VENTANA » 

202 REM »»»«**##*»*»*#***»«»*»**»»* 

203 REM 

204 AÍ-INKEY*: IF A*="" THEN 204 

205 IF A*»CHR*<13> THEN GOTO 74 

204. IF MID*(A*,2,1)="K" THEN PUT ( X , Y) , EX , PSETi X=X-SS-SS» < X-SS<0) : GOTO 211 

207 IF MID*(A*,2,1)="M" THEN PUT < X , Y> ,E7. , PSETl X=X+SS+SS* ( X+SS>319*SW-AX ) ! GOTO 2 

11 „ 

208 IF MID*(A*,2,1)="H" THEN PUT (X , Y) ,E7. ,PSET: Y=Y-SS-SS* ( Y-SS<0) s GOTO 211 

209 IF MID*(A*,2, 1)="P" THEN PUT (X , Y) ,E7., PSET: Y=Y+SS+SS» < Y+SSM99-AY) i GOTO 211 

210 GOTO 204 

211 GET (X,Y)-(X+AX,Y+AY) ,EXiPUT (X , Y) , D7. , PSET: GOTO 204 



Al principio del programa, después de 
Producirlo y hacer RUN, el ordenador 
-os preguntará qué tipo de pantalla que- 
emos utilizar. Caben dos posibles opcio- 



— 320 o pantalla en color (4 colores). 

— 640 o pantalla monocromo (tinta y 
toodo). 

Elige la que quieras utilizar en cada mo- 
mento. La diferencia entre las dos, apar- 
•e de la capacidad de color, es que con 
a primera tenemos 320 puntos de ancho 
. con la segunda 640. 




Las funciones que es capaz de realizar 
este programa se manejan con una sola 
mano, ya que todas las opciones posi- 
bles se pueden realizar con sólo pulsar 
una tecla. Estas son: 

P. Dibuja un punto en la posición ac- 
tual del cursor gráfico. 

O. Borra el punto sobre el que se en- 
cuentra el cursor gráfico (si lo hubiese). 

L. Traza una línea desde el último pun- 
to que se dibujó hasta la posición actual 
del cursor gráfico. Si el punto fuese un 
punto en el color del papel (borrar) la lí- 
nea será también del color del papel 
(borrará). 

X. Visualiza en pantalla las coordena- 
das actuales del cursor gráfico. 

M. Graba la pantalla en el disco. Des- 
pués de pulsar esta tecla, se le pregunta 
al usuario con qué nombre se va a gra- 
bar. SI el nombre no tiene extensión (.BIN 
por ejemplo) el ordenador asignará au- 
tomáticamente la extensión .BAS. 

N. Carga una pantalla que se en- 
cuentre en disco. Después de pulsar esta 
tecla se le pregunta al usuario el nombre 
de la pantalla a cargar. 

K. Este comando graba la pantalla en 
la memoria. Es un comando muy útil, pues 
nos permite hacer copias de seguridad 
de la pantalla sin tener que hacerlas en 
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el disco. Esto sirve para que, en el caso 
de borrar la pantalla por error, no perda- 
mos lo que hemos hecho. 

J. Recupera la pantalla que se alma- 
cenó en memoria con el comando K. 

ESCAPE. Anula la última acción reali- 
zada. Si hemos trazado una línea equivo- 
cadamente, pulsando la tecla ESCAPE la 
pantalla volverá a aparecer como esta- 
ba antes de trazar dicha línea. 

Z. Borra la pantalla. Antes de borrarla 
pide la confirmación del usuario. 

B. Borra un fichero del disco. También 
saca el directorio para que el usuario 
vea los ficheros que contiene el disco. 

D. Muestra el directorio. El programa 
pide la unidad de la cual se quiere co- 
nocer el directorio. 

R. Renombra un fichero. Antes de ha- 
cerlo saca el directorio de la unidad que 
se le especifique. 

S. Varía ia velocidad con la que se 
mueve el cursor gráfico. Dicha velocidad 
se puede regular entre 1 y 9. 

F. Colorea una zona cerrada, como 
un círculo, rellenándola de color. 

C. Cambia el color de la tinta. El co- 
lor se puede variar entre 0 y 3 en el modo 
de 320, y entre 0 y 1 en el modo de 640. 

W. Nos permite copiar una parte de la 
pantalla a otro lugar de la misma. Para 
ello hace falta poner el cursor gráfico en 
la esquina superior izquierda del trozo a 
copiar y pulsar la letra W. Después nos 
movemos a la esquina inferior derecha y 
volvemos a pulsar la letra W. Una vez he- 
cho esto, el cursor desaparecerá y noso- 
tros podremos mover la zona elegida por 
la pantalla con las teclas del cursor. Una 
vez que esté donde nosotros queremos, 
pulsamos ENTER y el cursor volverá a apa- 
recer. 

Las teclas que mueven el cursor gráfi- 
co son las que se encuentran en el tecla- 
do numérico que están en la parte dere- 
cha del teclado. Estas teclas son: 

2 — Movimiento hacia abajo. 
8 — Movimiento hacia arriba. 
4 — Movimiento hacia la Izquierda, 
ó - Movimiento hacia la derecha. 

SI en cualquier momento de la ejecu- 
ción del programa queremos ver todos 
los comandos de que dispone el SUPER- 
GRAFICS, sólo tenemos que pulsar el in- 




terrogante (?) para que aparezcan en 
pantalla. 



Notas sobre el programa 4 



Para cargar las pantallas que realices, 
desde uno de tus programas, sólo tienes 
que poner las siguientes Instrucciones: 

DEF SEG=&HB800:BLOAD "nombre" 





Comandos del programa Supergráflcos. 



Fichero de discos 



Este último programa, también para el 
SPECTRUM, nos permitirá tener almacena- 
da, de una forma cómoda y que no ocu- 
pa espacio, toda la información referen- 
te a nuestros libros. Con el programa po- 
dremos saber en cualquier momento 
quién escribió un cierto libro, qué edito- 
rial tiene en su catálogo un libro que nos 
interesa, en qué fecha lo compramos, 
etcétera. 



FICHERO DE LIBROS 



10 LET NF=1 

20 DIM T*<100,50> 

22 DIM A*<100,50> 

24 DIM C*< 100,50) 

25 DIM O$<100,50) 
30 CLS 

35 PRINT IN VERSE 1: 



CHERO 




8,7| INVERSE lj" 2 "¡ INVERSE O 
)" CARGAR FICHERO. "(AT 10, 7| INV 
ERSE 1)" 3 "¡ INVERSE O) " SALVAR 

FICHERO. " | AT 12,7) INVERSE 1)" 
4 "j INVERSE 0¡ " LISTAR FICHEROS 
. " ) AT 14,7) INVERSE 1¡" 5 "| INV 
ERSE 0¡" BUSCAR UNA FICHA. ")AT 1 
6,7) INVERSE 1)" 6 ") INVERSE O) 
" BORRAR EL FICHERO." 

42 PRINT AT 21,1) INVERSE 1)" 
OPCION ■ "| FLASH 1|" " ) CHR* 8| 
30 LET K*=INKEYÍ 
60 IF KÍ<"1" OR Kí>"6" THEN □ 
O TO 30 

63 PRINT INVERSE 1)K*|" "| OV 
ER 1|AT 4+2»VAL K*,7¡" 

"I FOR 1=1 TO 200i 

NEXT I 

70 GO TO 1000»VAL K* 

1000 CLS i PRINT INVERSE 1)" 
INTRODUCIR FICHA NUEVA 

1001 PRINT INVERSE 1 1 '">■■■■■■■■■ 



FICH 
; AT 2,25 



1002 PRINT INVERSE 1|" 
AS EN MEMORIA = 
|NF-1 

1005 INPUT "TITULO: "( LINE TÍ(N 
F) 

1006 PRINT ••■ INVERSE 1¡" TI TUL 

LO : ") INVERSE O) " ")T*( 

NF) 

1010 INPUT "AUTOR: "! LINE A* (NF 

) 

1015 PRINT ' INVERSE 1¡" AUTOR . 

: ") INVERSE O) " " ¡ Aí (NF 

} 

1020 INPUT "CLASIFICACION: "; LI 
NE C*(NF) 

1025 PRINT ' INVERSE 1)" CLAS.IFI 
CACION.i ", INVERSE O)" "¡CÍ(NF> 
1030 INPUT "EDITORIAL: ") LINE O 
*(NF> 

1040 PRINT ' INVERSE 1 S " EDITORI 

AL : ") INVERSE O) " "¡0*(NF) 

1050 LET NF=NF+1 

1400 PRINT ftO¡ INVERSE 1)" INTRO 
DUCIR OTRA FICHA S/N "( 

1410 LET W*=INKEY* 
1420 IF WÍ="S" OR Wí="s" THEN B 
O TO 1000 

1430 IF W*<>"N" AND W*<>"n" THEN 

00 TO 1410 
1440 GO TO 30 
2000 GO SUB 2400 

2020 INPUT " CATALOGO ?<S/N>") LI 
NE B* 

2030 IF B*="S" THEN CAT 1 
2040 GO SUB 2300 

2060 LOAD »"M"; 1;N*+"A" DATA A* ( 

) 

2061 LOAD »"M") 1)N*+"T" DATA T* ( 

) 

2062 LOAD 
) 

2063 REM 
A O* ( ) 
2065 GO SUB 4400 
2070 GO TO 30 
2100 GO SUB 2300 

2110 LOAD NÍ+"A" DATA A* < ) 

2111 LOAD Ní+"T" DATA TÍO 

2112 LOAD N*+"C" DATA O* O 

2113 LOAD N*+"0" DATA O* ( ) 
2115 GO SUB 4400 

2120 GO TO 30 

2300 INPUT "NOMBRE DEL FICHERO ? 
IMAX.9 C. ) "¡ LINE N* 
2310 IF LEN N*>9 THEN GO TO 204 

O 

2320 RETURN 

2400 INPUT "CASSETTE (C) O MICRO 

(M) "¡ LINE B* 
2410 IF B*="C" THEN GO TO VAL K 
«•1E3-H00 



"M"( 1)N*+"C" DATA Cí ( 
LOAD *"M") l)N*+"0" DAT 



2420 IF B*<>"M" THEN GO TO 2400 
2430 RETURN 
3000 GO SUB 2400 
3010 GO SUB 2300 

3020 SAVE *"M")1)N*+"A" DATA A* ( 

) 

3021 VERIFY #"M" j 1 J NÍ+"A" DATA A 
ÍO 

3022 SAVE *"M") 1)N*+"T" DATA T* ( 
) 

3023 VERIFY *"M" ¡ 1 ) N*+"T" DATA T 
*(> 

3024 SAVE »"M"; 1)N»+"C" DATA Cí < 
) 

3023 VERIFY *"M" j 1 ; NÍ+"C" DATA C 
*<> 

3026 REM SAVE *"M" ¡ 1 ) N*+"0" DAT 
A 0*0 

3027 REM VERIFY »"M" > 1 ) N*+"0" D 
ATA 0*0 

3030 GO TO 30 
3100 GO SUB 2300 

3110 SAVE N*+"A" DATA A* O 

3111 SAVE N*+"T" DATA T* O 

3112 SAVE N*+"C" DATA CÍO 
3120 GO TO 30 

4000 CLS i PRINT INVERSE 1» "«== 
LISTAR FICHERO === 



4001 PRINT IMPRIMIMOS DESDE 
LA FICHA "j: INPUT "NO. DE FICHA 

"¡NI 

4002 PRINT NI 

4003 PRINT ""HASTA LA FICHA "¡: 
INPUT "NO DE FICHA ";N2 

4004 PRINT N2 

4005 IF (NK1 OR N1>NF-1) OR (N 
2<N1 OR N2>NF-1) THEN GO TO 40 
00 

4006 PRINT f,0j INVERSE lj" PULSA 
UNA TECLA ") 

4009 FOR N=N1 TO N2 

4010 LET B*=AÍ(N) 
4020 GO SUB 4300 
4030 LET D*=BÍ 
4040 LET BÍ=T*(N) 
4050 GO SUB 4300 
4060 LET EÍ=BÍ 
4070 LET B*=C*(N> 
40B0 GO SUB 4300 

4090 LET F*=BÍ 

4091 LET BÍ=OÍ(N) 

4092 GO SUB 4300 

4093 LET GÍ-BÍ 
4096 CLS 

4100 PRINT AT 0,0)" -FICHA "|N|" 

4110 PRINT AT 9,0) INVERSE 1)"TI 

TULO i "; INVERSE O;" " , E* 

4120 PRINT AT 12,0) INVERSE 1)"A 

UTOR : ") INVERSE O;" " ¡ D* 

4130 PRINT AT 15,0» INVERSE 1¡"C 

LASIFICACION : ") INVERSE O)" "¡ 

F* 

4132 PRINT AT 18,0) INVERSE 1 : "E 
DITORIAL "; INVERSE O)" " ) Q* 
4140 PRINT r.O) FLASH 1) "PULSA UN 
A TECLA. O PARA IMPRIMIR" ; FLASH 

O 

4145 PAUSE O: IF INKEY*="Q" THEN 

COPY 
4150 NEXT N 
4160 PAUSE O 
4170 GO TO 30 
4300 FOR A=l TO LEN Bí+l 
4310 IF BÍ(A><>" " OR BÍ(A+1)<>" 
" OR Bí(A+2)<>" » OR B*(A+3)<>" 
» THEN NEXT A 
4320 LET B*=BÍ(1 TO A-l) 
4330 RETURN 
4400 FOR A=l TO 100 
4410 IF AÍ(A,1)=" » THEN LET NF 
=A: 
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4420 NEXT A 
4430 RETURN 

5000 INPUT "TITULO QUE BUSCAS 7" 
J LINE G* 

5010 FOR B=l TO NF-1 

5015 LET B*=T*<B> 

5016 GO SUB 4300 

5020 LET Nl-Bl LET N2=Bi GO TO 4 

009 

5030 NEXT B 
5040 CL8 

5050 PRINT "TITULO NO PRESENTE E 
N EL FICHERO" 
5060 PAUSE O 
5070 GO TO 30 

6000 INPUT "NUMERO DE FICHA ?"|F 

6010 IF F>NF THEN CLS i PRINT A 

T 0,0¡"N0 HAY TANTAS FICHAS. "i P 

AUSE Oí GO TO 30 

6020 FOR A=F TO NF+1 

6030 LET A*<A)=A*(A+1) 

6040 LET T*(A)=T*(A+1) 

6050 LET C*(A>-C*(A+1> 

6060 NEXT A 

6070 LET NF=NF 

6080 GO TO 30 





^AJ 



Ejemplo de ficha. 



El número de fichas que puede acep- 
tar el programa es de 150. SI tenemos 
más libros no hay ningún problema. Los 
podemos agrupar por temas y crearnos 
un fichero distinto por cada tema. 

Este programa aparecerá en las versio- 
nes para los distintos ordenadores en to- 
mos sucesivos. 



Ecualizador 

Este programa es una pequeña curiosi- 
dad para los usuarios del SPECTRUM. Con 
él podrán ver en la pantalla del ordena- 
dor cómo es la onda sonora de la voz hu- 
mana, de un ruido, de un instrumento, de 
una canción, etc. 





FICHO NUF.UR. 
CRROBR FICHERO. 
SRLVRR FICHERO. 
LISTRR FICHERO». 
BUSCfiR UNA PICHR. 
BORRAR EL FICHERO. 



Menú del progama «Ficheros de libros». 



ECUALIZADOR 



1 REM ++++*•+++++++++++++ 

2 REM + ECUALIZADOR DE + 

3 REM + SONIDOS + 

4 REM ++++++++++++++++++ 

5 REM + PORi + 

6 REM + CARLOS CORAL + 

7 REM +++++++++++++++++.+ 
S REM 

9 GO SUB 100 

10 LET K*=INKEY* 

11 PRINT AT 10,9) IN VERSE ll"P 
ULSA UNA TECLA" 

12 IF K*="" THEN GO TO 10 

13 CLS ! LET DIR=23300 

14 LET X=0 

15 PLOT X,87 

16 PLOT X+1,87 

17 LET Y=PEEK DIR 

18 IF Y>175 THEN LET Y=175 

19 PLOT X+1,87 

20 PLOT X,87 

21 LET A=Y-87 

22 LET B=87-Y 

23 DRAW 2, A 

24 DRAW 2,B 

^ 64000 



A 



r 



27 IF X>=252 THEN CLS : LET X 

-O 

28 GO Tü 17 

100 FOR F=64000 TO 64040 

101 READ A 

102 POKE F,A 

103 NEXT F 

104 RETURN 

105 REM 

110 DATA 175,50,4,91,6,8,62,117 

111 DATA 219,254,203,119,204,21 
,250,196 

112 DATA 31,250,16,242,201,58,4 
,91 ,203, 135 

113 DATA 23,50,4,91,201,58,4,91 
,203,199 

114 DATA 23,50,4,91,201 



Lo único que tienes que hacer para 
que este programa funcione es, aparte 
de teclearlo y hacer RUN, meter una cin- 
ta grabada en el cassette que utilizas 
para leer y grabar programas y pulsar la 
tecla PLAY. En cuando comience a sonar 
la cinta veremos en la pantalla la onda 
de dicho sonido. 




Esta es la onda de la voz humana. 





I A Onda que realiza el programa 
f-tT Ecuallzador cuando escucha en 
•fock and Roll. 



® 
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Para que el programa entienda bien la 
música, o lo que esté grabando en la cin- 
ta, no es necesario poner muy alto el vo- 
lumen. Es conveniente que éste se en- 
cuentre en la mitad de su recorrido. 



TECNICAS 
DE ANALISIS 

TABLAS DE DECISION 




AS tablas de decisión 
constituyen un proce- 
dimiento simple y cla- 
ro de presentar las 
condiciones de pro- 
ceso en el tratamien- 
to de datos. Es normal 
que los diferentes 



procesos elementales puedan ser defini- 
dos individualmente, así como las condi- 
ciones bajo las que dichos procesos de- 
ben aplicarse. Una tabla de decisión es 
una matriz en la cual se intercalan estas 
condiciones que han de cumplirse para 
que se apliquen unos tratamientos dados 
y los tratamientos que han de aplicarse 
en cada caso. 

En una tabla de decisión aparecen 
cuatro partes claramente diferenciadas: 



1) 

CON 
DI 

CIO 
NES 


SITUACIONES 


2) 

TRA 
TA 
MIEN 
TOS 




SECUENCIAS 
DE 

TRATAMIENTOS 



Estructura de una tabla de decisión. 



1) Matriz de condiciones. 

En ella aparecen todas y cada una de 
las condiciones que intervienen en el 
proceso estudiado, al cual se refiere la 
tabla de decisión. 

Es importante que estas condiciones 
estén perfectamente definidas y sean in- 
dependientes una de otras (es decir, se 
puedan identificar sin interrelación con 
las restantes): la tabla de decisión, pre- 
cisamente, establecerá la relación de 
unas con otras y con los tratamientos a 
aplicar en cada caso. 

2) Matriz de tratamientos. 
Aparecen en esta sección de la tabla 

de decisión todos los diversos tratamien- 
tos que habrá que aplicar en las diferen- 
tes situaciones del proceso que se estu- 
dia. 

Cada uno de estos tratamientos repre- 
sentará un pequeño módulo de proceso 
dentro del pograma general en que se 
plasmará la tabla de decisión. 

3) Situaciones. 

Conjunto de posibles combinaciones 
de las condiciones descritas en la matriz 
de la izquierda de la tabla de decisión. 

En esta parte de la tabla se van ano- 
tando, por columnas, las condiciones 
que deben darse en cada una de las po- 
sibles situaciones. 

4) Secuencias de tratamientos. 

Combinaciones de los distintos trata- 
mientos a aplicar en función de las situa- 
ciones diferentes que aparecen en la 
parte tercera de la tabla. 

Para cada situación se reseña, en la 



misma columna, el conjunto de los trata- 
mientos a aplicar a los datos en esa situa- 
ción. 



Situaciones 



Condición 1 


S 


N 


s 


S 


s 




S 


Condición 2 


N 


N 


s 


S 


N 




N 


Condlc. 3 
















caso A 


s 


s 


s 


S 


N 




S 


Condic. 3 
















caso B 


N 


N 


N 


s 


N 


etc. 


s 


Condlc. 3 
















caso C 


N 


N 


S 


s 


S 




s 


Condición 4 


S 


S 


s 


N 


N 




s 


Condición m 


S 


S 


N 


N 


N 




N 


Tratamiento 1 


X 


X 




X 






X 


Tratamiento 2 




X 


X 


X 


X 






Tratamiento 3 


X 






X 






X 


(Ir a tabla B) 




























etc. 




Tratamiento m 




X 






X 




X 



















Un ejemplo de tabla de decisión. 

De acuerdo con lo anterior, se puede 
ver en Ja figura 2 un ejemplo de tabla de 
decisión: la primera situación se produci- 
rá cuando SI se cumple la condición 1, 
cero NO la 2; de la condición 3, SI se 
cumple el caso A pero NO los casos B y 
Z. etc. La prolongación hacia abajo de 
esa columna (correspondiente a la situa- 
ción 1. a ) nos indica que en este caso se 
debe aplicar el tratamiento 1 y el trata- 
miento 3 (que conduce, a su vez, a otros 
procesos o tratamientos descritos en otra 
tabla de decisión: la tabla B). Del mismo 
modo, la situación segunda (caso en que 
SI se cumplen las condiciones 3-caso A, 
4,... m; y no se cumplen las restantes con- 
diciones) exige que se apliquen los tra- 
tamientos 1, 2,... m. 

Existen tablas de tipo «ampliado»: 
cuando las condiciones presentan más 
de dos alternativas o conjunto de valo- 
res. En contraposición a ellas, cuando en 
una tabla de decisión todas las condicio- 
nes son simples, la tabla se suele llamar 
•limitada». La tabla presentada en la fi- 
gura 2 es del tipo «mixto», pues aparecen 
en ella condiciones simples y una condi- 
ción (la tercera) con varias alternativas. 
A veces, las tablas de decisión amplia- 
das o mixtas presentan en una sola con- 
dición las diferentes opciones que se 
c jeden dar; en ese caso se pueden con- 



vertir (como se ha hecho en la tabla de 
la figura 2) a tablas con condiciones sim- 
ples desglosando en varias la condición 
múltiple. 

Por otro lado, se suelen distinguir tam- 
bién, en las tablas de decisión, aquéllas 
que son completas en sí mismas (tablqs 
«cerradas») de las que (como el ejemplo 
presentado) remiten, en algunos de los 
tratamientos propuestos, a la consulta de 
otra u otras tablas adicionales: estas ta- 
blas se suelen llamar «abiertas» o «re- 
currentes». 

Otro aspecto a tener en cuenta es el 
tipo de reglas de decisión que se Inclu- 
ye en la tabla. Pueden ser de tipo AND, 
OR, ELSE o múltiples. La regla AND signifi- 
ca que han de darse todas las condicio- 
nes Indicadas en la columna correspon- 
diente de la matriz de situaciones, para 
que se ejecuten los tratamientos marca- 
dos en la parte inferior de la columna: 
como se está afirmando que ha de cum- 
plirse la condición «i» Y la condición «j» 
Y la condición «K» Y... se designa este 
tipo de regla con el nombre inglés del 
operador lógico correspondiente (AND). 

En el ejemplo propuesto en la figura 2 
hemos considerado que las reglas de de- 
cisión (columnas de la matriz de situacio- 
nes) son de tipo AND. 

En las reglas de tipo OR se supone que 
se produce la situación descrita en la 
correspondiente columna (y que se de- 
ben aplicar, en consecuencia, los trata- 
mientos indicados) si se cumple la con- 
dición «i» O la condición «j» O la condi- 
ción «k» O etc.: es decir, se «disparará» 
la correspondiente regla si se cumplen 
una o más de las condiciones marcadas. 

La regla de tipo ELSE se llama así en re- 
lación con la instrucción (común a varios 
lenguajes de programación) IF... ELSE... 
(SI... EN-OTRO-CASO...; SI sucede una con- 
dición, hacer esto; EN-OTRO-CASO hacer 
tal otra cosa); aparece este tipo de re- 
gla de decisión cuando sólo algunas de 
las posibles situaciones nos conducen a 
tratamientos especializados, mientras 
que todo el resto de las situaciones pro- 
ducen un tratamiento concreto (único 
para todas las restantes); en este caso, 
se detallan las situaciones que condu- 
cen a tratamientos específicos y el resto 
de las posibilidades se agrupan en una 
única regla de decisión (que se llama re- 
gla ELSE). 




TECNICAS 

DE PROGRAMACION 

ESTRUCTURAS DE DATOS 



TRADICIONALMENTE se 
ha considerado que 
un programa de or- 
denador bien cons- 
truido debe constar 
de dos partes clara- 
mente diferenciadas: 
por un lado, las ins- 
trucciones de que consta el programa; 
por otro, los datos sobre los que éstas ac- 
túan. A su vez, las instrucciones se divi- 
den en cuatro grupos principales: 

• Asignación a una variable del valor 
de una expresión. 

• Estructuras de control, que permiten 
dirigir la ejecución del programa por los 
pasos necesarios para realizar la tarea 
propuesta. 

• Instrucciones de modularización, 
que descomponen un programa com- 
plejo en partes más pequeñas, cerradas 
en sí mismas y más fácilmente compren- 
sibles, lo que facilita la construcción, 
mantenimiento y legibilidad de los pro- 
gramas obtenidos. 

• Instrucciones de acceso a los dis- 
positivos periféricos (entrada/salida), 
que permiten que nuestro programa pue- 
da utilizar adecuadamente la pantalla, 
los ficheros en disco, la impresora, los 
gráficos y muchos otros dispositivos. 

Pero un pograma sin datos no serviría 
para nada. Porque, en definitiva, ¿qué es 
un programa, sino un medio que, a partir 
de ciertos datos iniciales, nos permite 
calcular ciertos resultados que deseába- 
mos conocer? Esta definición se aplica 



incluso a programas que aparentemente 
no calculan ningún dato concreto. Como 
ejemplo, pensemos en el control por or- 
denador de una máquina que ha de rea- 
lizar un trabajo determinado: la fabrica- 
ción de un tornillo o el ensamblaje de 
dos piezas en una cadena de montaje. 
Ante la mirada del observador casual, el 
programa que controla la máquina no 
parece estar calculando resultados de 
ningún tipo, pues se limita a regular la ac- 
ción de la máquina y a dirigir sus meca- 
nismos. Sin embargo, en realidad existe 
un considerable flujo de información, de 
datos, que van introduciéndose en la 
máquina por diversos medios y convir- 
tiéndose en otros a través de cálculos 
más o menos complejos. Antes de poder 
mover el brazo de un robot que debe co- 
locar cierta pieza en el lugar deseado, el 
programa debe poseer Información so- 
bre la posición actual de la pieza, el lu- 
gar exacto a donde debe llevarla y la lo- 
calización de las distintas partes del bra- 
zo mecánico. Estos datos, que puede 
conseguir por medio de sensores visua- 
les o táctiles, serán elaborados para ob- 
tener otros, que definen con todo deta- 
lle cada uno de los movimientos elemen- 
tales que habrán de realizarse. Los resul- 
tados del cálculo son, también en este 
caso, datos, aunque no podamos verlos 
explícitos sobre el papel de una impre- 
sora. 

Veamos un ejemplo. En el capítulo pri- 
mero vimos un algoritmo que nos permi- 
tía convertir a la base 2 un número ente- 
ro cualquiera expresado en la base diez. 



- 



Repitamos aquí el algoritmo, en forma de 
organigrama: 




Ahora vamos a ver cómo se construiría 
un programa que realice este algoritmo 
en el lenguaje BASIC. 



10 DI M RUO) 

20 FOR 1-1 TO 10: LET R(I)»0: NEXT 
30 PR1NT "dam» un número »ntr« 

O y 1000" 
40 INPUT X 
50 FOR 1=1 TD 10 
60 LET OINTÍX/2) 
70 LET R(I)=X-2*C 



80 IF C-0 THEN SOTO 110 
90 LET X-C 
100 NEXT I 

110 FOR 1-1 TO 10: PRINT R(ll-I);i 
NEXT I 



1 



Comparando el programa con el orga- 
nigrama, podemos descubrir la siguiente 
correspondencia entre los bloques y las 
instrucciones: 



Bloque n.° 


Líneas n.° 


1 


30-40 


2 


50 


3 


60-70 


4 


80 


5 


90 


6 


100 


7 


110 



En cuanto a las líneas 10 y 20 del progra- 
ma, definen la variable R, donde se guar- 
dará la sucesión de restos (es decir, las 
cifras en base 2) y asignan un valor ini- 
cial de cero a cada uno de los diez luga- 
res que tiene previstos para las cifras del 
resultado. 

Obsérvese también que, en la Instruc- 
ción 110, los valores de los restos se Im- 
primen en orden inverso, como es preci- 
so hacer para que las cifras del numero 
convertido a la base 2 aparezcan en el 
orden correcto. 

Siempre es difícil, en los programas es- 
critos en BASIC, distinguir claramente en- 
tre las instrucciones y los datos, pues este 
lenguaje es muy poco estructurado. En 
particular, la regla que permite utilizar 
una variable sin haberla definido previa- 
mente facilita que los datos queden es- 
parcidos a lo largo y a lo ancho de los 
programas y mezclados íntimamente 
con las Instrucciones ejecutables. 



I TECNICAS DE PROGRAMACION 



En el caso del programa 1, los datos 
son los siguientes: 

• La variable X, donde se guarda ini- 
clalmente el valor en base 1 0 que se de- 
sea convertir a la base 2, aunque a lo lar- 
go del programa este valor va siendo sus- 
tituido por los cocientes sucesivos, de 
acuerdo con el algoritmo. 

• La varible C, donde se guarda el va- 
lor del cociente entero de X al dividirlo 
entre 2. 

• La variable R, que no es como las an- 
teriores, que tienen un solo valor, sino 
que puede considerarse como un agre- 
gado de diez valores diferentes, donde 
van a guardarse los restos sucesivos que 
vayamos obteniendo. Esto se debe a que 
no debemos perder estos restos, puesto 
que entre todos constituyen el resultado 
del programa. Podemos representar los 
diez valores distintos de la variable R con 
los símbolos R(l), R(2), R(3), R(4), R(5), 
R(ó), R(7), R(8), R(9)yR(10). 

• La variable I, que actúa como conta- 
dor de los tres bucles de que consta el 
programa. Sólo uno de estos bucles (el 
central) aparece en el organigrama. Los 
otros dos, el de inicializaclón de los diez 
valores de R (instrucción 20) y el de es- 
critura de los mismos (instrucción 110), 
están implícitos. 

Puede verse que sólo la variable R está 
claramente separada de la parte ejecu- 
table del programa. Esto se debe a que, 
tratándose de una variable especial (un 
agregado de datos), debe definírsela ex- 
plícitamente como tal. La instrucción 10 
tiene por objeto, precisamente, comuni- 
carle este hecho al Intérprete de BASIC, 
es decir, pedirle que le dé un tratamien- 
to diferente al de las restantes variables 
DIM R( 1 0) significa, pues, que R es una va- 
riable de «dimensión» 10, es decir, un 
agregado de diez valores. 

El lenguaje BASIC permite colocar las 
instrucciones DIM en cualquier parte del 
programa, siempre que sea antes de la 
primera utilización de las variables 
correspondientes. Sin embargo, no es 
una buena técnica de programación 
aprovecharse de esto para distribuir ale- 
gremente las instrucciones DIM por diver- 



sos lugares de nuestros programas, pues 
esto tiende a hacerlos menos legibles, le 
que dificulta su comprensión posterior 
por otras personas, o incluso por nosotros 
mismos. Lo recomendable es colocar to- 
das las Instrucciones DIM al principio del 
programa, de manera que sea muy fácil 
ver, de una sola ojeada, cuáles son las 
variables que actúan como agregados 
de datos. Tan sólo existe una excepción 
a esta regla de buen programar, que se 
verá cuando hablemos de la modularlza- 
ción de los programas. 

Las Instrucciones del tipo de la línea 
10, que no realizan ejecución alguna, 
sino que sólo siven para definir la estruc- 
tura de ciertos datos que van a ser utili- 
zados posteriormente por un programa, 
se llaman «Instrucciones declarativas». 

Las variables que podríamos llamar 
«normales» (que tienen un solo valor), 
como I, X y C en el ejemplo anterior, no 
es preciso definirlas, por lo que aparece- 
rán por primera vez en nuestros progra- 
mas BASIC cuando tengamos que hacer 
uso de ellas, y no antes. En este caso con- 
creto es fácil localizarlas, pues el progra- 
ma es corto. Así vemos que I aparece por 
primera vez en la línea 20, X en la 40 y C 
en la 60. Pero es fácil comprender que, 
si el programa BASIC es largo y comple- 
jo, será mucho más difícil separar los da- 
tos de las Instrucciones. 

Si el programa anterior hubiera sido es- 
crito en lenguaje PASCAL, no sería tan di- 
fícil distinguir las dos partes principales 
de todo programa: datos e instrucciones. 
En efecto: en PASCAL, todo programa 
debe comenzar por un conjunto de Ins- 
trucciones declarativas, donde deben 
definirse todas y cada una de las varia- 
bles que van a tomar parte en el progra- 
ma, y que deben estar situadas al princi- 
pio, antes de las instrucciones ejecuta- 
bles. Esta es una de las razones por las 
que PASCAL se considera un lenguaje 
mucho más estructurado que BASIC, aun- 
que hay otras, que iremos viendo poste- 
riormente. 

Veamos cómo se escribiría el mismo 
programa (a partir del mismo organigra- 
ma) en el lenguaje PASCAL. 

Se puede ver cómo al principio de este 
programa aparecen, encabezadas por 



var 

x, i: integer; 

r: arraye 1.. 103 oí integer; 



begin 

writaln ('Dama un número entre 0 y 
1000'); readln(x); 

for i i-l to 10 do 
bagin 

rCi x mod 2; 
xs-x div 2; 
end; 

for i l-l to 10 do write(rCll-i])| 

«nd. 




la palabra reservada «var», las declara- 
ciones de todas las variables que utiliza: 
x, donde se guarda el número decimal 
entero que vamos a convertir a la base 
2; I, que sirve como contador; y r, que es 
un agregado de diez valores, donde ire- 
mos colocando los restos sucesivos. En 
este caso no hemos inlcializado los res- 
tos a cero, ni tampoco hemos abandona- 
do el cálculo tan pronto se obtuvo el co- 
ciente cero, sino que continuamos calcu- 
ando restos hasta que el contador del 
r-cle (la variable i) alcanza el valor 10. 
>_n embargo, el resultado es totalmente 
equivalente al del programa anterior, 
oues todos los restos adicionales que ob- 
tendremos serán siempre iguales a cero. 
Debido a estas pequeñas modificacio- 
nes, el organigrama correspondiente a 
este programa no es exactamente igual 
al de la figura 1, sino que corresponde al 
de la figura 2. 

Por último, puede ocurrir, como en el 
caso de un lenguaje de quinta genera- 
ción como el APL, que la potencia del 
enguaje sea tan grande que un organi- 
grama relativamente detallado como el 
anterior resulte innecesario, pues es po- 
sible resolver el problema de la conver- 
= ón de números de la base 10 a la base 
2 en una sola instrucción ejecutable. En 
este caso, tampoco será necesario se- 
oarar las instrucciones de los datos, pues 
el programa es tan reducido que la se- 
paración es obvia, y no precisa estructu- 
-aclón alguna. Veamos, por consiguien- 
te en el programa 3, cuál es esa instruc- 




Calcular 
resto R(l) 
y cociente X 
deX*2 







Hacer 



¿Es I <í 10? 



SI 







Imprimir restos 
| en orden Inverso ] 








ción APL que resuelve el problema de la 
conversión numérica, junto con un par de 
ejemplos de su utilización: 



<10p2)tU 

.D: 

127 

0001111111 



0: 



<10p2)r0 



23 



0000010111 




TECNICAS DE PROGRAMACION 



En este programa no existe ningún 
nombre de variable, pues no es necesa- 
rio. El número decimal que deseamos 
convertir a la base 2 se introduce direc- 
tamente desde el teclado (el símbolo 
cuadrado, en APL, significa que quere- 
mos obtener datos del teclado, y equiva- 
le hasta cierto punto a la instrucción IN- 
PUT de BASIC) y se convierte a la base de- 
seada en una sola operación, represen- 
tada por el símbolo semejante a una T 
pequeña. En cuanto a los datos incluidos 
entre paréntesis a la izquierda de este 
símbolo, el 2 indica la base de numera- 
ción a la que se desea convertir y el 10 
es el número de cifras que deseamos ob- 
tener del número binario resultante. 

Como es lógico, el organigrama co- 



rrespondiente a este programa no es 
tampoco el de la figura 1, sino mucho 
más sencillo. Veámoslo en la figura 3. 

Para terminar, hay que añadir que 
cualquiera de los programas anteriores 
puede transformarse fácilmente en otro 
que realice la conversión de la base 10 
a otra base calquiera distinta de la base 
2. Para ello, en el caso de la versión BA- 
SIC, bastará cambiar el 2 que aparece 
en las líneas 60 y 70 por la base de que 
se trate. Lo mismo ocurre con el progra- 
ma PASCAL, donde también aparece la 
base 2 dos veces, en dos Instrucciones 
consecutivas. En el caso del programa 
APL, también hay que sustituir el 2 Inclui- 
do entre paréntesis por la base de nume- 
deseada. 




Convertir un 
n.° obtenido 
del teclado 
a la base 2 





PASCAL 



DEFINICION DE DATOS EN 
PROGRAMA PASCAL 



EAMOS el siguiente 
programa. 



program Calculador; 

begln 
writein ('El número ',5, 
'al cuadrado vale ',5*5); 
writein («El número ',5, 
'al cubo vale *,5 # 5»5) 

end. 




Como veremos más adelante con ma- 
yor detalle, la Instrucción «writein» sirve 
para sacar por pantalla las frases, núme- 
ros y resultados de operaciones matemá- 
ticas que aparecen entre paréntesis justo 
detrás de ella. Por tanto, en la pantalla 
aparecerá algo así: 



El número 5 al cuadrado vale 25. 
El número 5 al cuadrado vale 125. 



Si ahora quisiéramos cambiar el pro- 
grama para que hiciese los cálculos con, 
sor ejemplo, 6 en lugar de 5, tendríamos 
aue sustituir todos ios cincos que apare- 



cen en el programa por seises. SI el pro- 
grama fuese largo, esto podría llegar a 
ser muy tedioso. 



Constantes numéricas 



En PASCAL es posible asociar nombres 
(identlficadores) a los números que van 
a ser constantes a lo largo del programa. 
Este nombre será luego el que se emplee 
en lugar del número. La asociación se 
hace en la zona de descripción de datos 
(es decir, tras la cabecera del progra- 
ma); si lo empleamos en el programa an- 
terior: 



A 



program Calculador; 
const Nu = 5; 
begln 

writein ('El número ',5, 
'al cuadrado vale ',Nu*Nu); 
writein ('El número ',5, 
'al cubo vale ',Nu»Nu»Nu) 
end. 
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Este programa es totalmente equiva- 
lente al primero, pero hemos utilizado lo 
que se denomina «declaración de cons- 
tantes». 

Gracias a esto, cada vez que aparez- 
ca la palabra Nu en alguna parte del pro- 
grama, será como si realmente hubiése- 
mos puesto un cinco. 

Si ahora quisiéramos que el programa 
funcionase con un seis, bastaría con re- 
tocar el sitio donde hemos dicho que Nu 
equivale a 5, es decir, pondríamos: 

eonst Nu = 6; 

La declaración de constantes siempre 
va precedida por la palabra reservada 
CONST y sirve para indicar al compilador 
que todo lo que venga a continuación, 
hasta que aparezca otra palabra reser- 
vada (que en este caso es BEGIN), son de- 
finiciones de constantes. Tras CONST se 
escribe el nombre a utilizar, un signo 
Igual y el valor que queremos asociar al 
nombre. Al final de la zona de declara- 
ción de constantes siempre va un punto 
y coma (que, como iremos viendo, es lo 
que se utiliza más a menudo para sepa- 
rar cosas en PASCAL). 

Podemos declarar todas las constantes 
que queramos sin más que poner sus de- 
finiciones una detrás de otra separadas 
entre sí por punto y coma: 

eonst Juan = -15; Luis = 1234; 
Ene = -347; 

Quedaría más claro así: 

eonst 
Juan = -15; 
Luis = 1234; 
Ene = -347; 

De esta forma, cada vez que en el pro- 
grama aparezca Juan será como si hu- 
biésemos puesto -15, y análogamente 
con los otros. 




Textos 



En el programa hay también textos o 
frases. En PASCAL las frases se escriben 
siempre entre apóstrofos como en «El nú- 
mero» o «al cubo vale». Dentro de una fra- 
se pueden ponerse letras, cifras, símbo- 



los, espacios en blanco, etc., con total ft- 
bertad; el compilador la toma tal come 
es, sin Intentar analizar lo que contiene 

'Pono eonst y no pasa nada' 

Para que aparezca un apostrofe er 
medio de una frase sin que el compila- 
dor se crea que es el que marca el final 
se pone por duplicado: 

'Esta frase tiene un " en medio' 

Para que aparezca un apóstrofo en 
talla sólo aparecerá un apóstrofo. 

Al igual que con los números constan- 
tes, podemos asociar un identificador a 
una frase. Es simplemente otro tipo de 
constante y por ello se declara de mane- 
ra análoga: 

I program Calculador; 
cost 
Nu = 5; 

Fr = 'El número '; 
begin 

wrlteln (Fr.Nu, 

'al cuadrado vale', Nu'Nu); 

wrlteln (Fr,Nu, 

'al cubo vale', Nu'Nu'NuNu) 



í ~ 




1 E=L 





Así, cada vez que aparece Fr es como si 
hubiésemos puesto realmente la frase. 

Las frases son distintas de los números. 
Estos se guardan en la memoria del orde- 
nador usando unos códigos especiales 
para ello. Sin embargo, si declaramos la 
constante C = '-54', ésta se guarda con 
un código para el signo menos, otro para 
la cifra 5 y otro para la cifra 4. C no se 
puede emplear para cálculos matemáti- 
cos; es sólo una frase que casualmente 
tiene aspecto de número. 




Si los programas sólo pudieran trabajar 
con datos que son siempre los mismos, 



servirían para bastante poco. En PASCAL, 
como es lógico, se pueden tener datos 
variables, pero hay que declararlos al 
principio del programa. 

Los datos variables se guardan en por- 
ciones de la memoria del ordenador, 
siendo estas porciones de mayor o me- 
nor tamaño según el tipo de dato que 
tengan que alojar. 

La declaración de variables sirve fun- 
damentalmente para que: 

1 . El compilador reserve las porciones 
de memoria necesarias y del tamaño 
adecuado. 

2. Asociar a cada porción un nombre 
para así poder utilizar el dato que guar- 
de llamándole por ese nombre. 

La zona de declaración de variables se 
encuentra justo tras la de las constantes 
(caso de existir ésta) y antes de la zona 
de instrucciones. Por tanto, la estructura 
de un programa queda de la siguiente 
manera: 



program I 



NombreDelPrograma; 



const... 



var... 



Declaración de 
constantes 

Declaración de 
variables 



begin 




El comienzo de la zona de definición 
de variables se indica con la palabra re- 
servada VAR, tras la que se escriben todas 
las definiciones que se necesiten separa- 
das entre sí por punto y coma. Cada de- 
finición consta del nombre de la variable 
seguido de dos puntos y de la descrip- 



ción del tipo de variable a que corres- 
ponde. Veamos un ejemplo: 

var 

Edad : integer; 
Peso : integer; 
Inicial : char; 

Cuando dos o más variables son del mis- 
mo tipo, se puede Indicar de manera re- 
sumida poniendo sus nombres uno a con- 
tinuación de otro y separados por co- 
mas: 

var 

Edad, Peso : integer; 
Inicial : char; 



INTEGER y CHAR son dos tipos de datos 
predefinidos que sirven, respectivamen- 
te, para guardar números enteros y ca- 
racteres (es decir, textos de un solo ca- 
rácter). 

Por tanto, estaríamos indicando al 
compilador que queremos tener dos va- 
riables de nombre «Edad» y «Peso» para 
guardar números enteros y otra de nom- 
bre «Inicial» para guardar caracteres. 

En PASCAL existen muchos tipos de da- 
tos además de INTEGER y CHAR, e Incluso 
es posible Inventar nuevos tipos. Una re- 
gla de oro del PASCAL es la siguiente: 



Manca 
ti 



nca se pueden mezclar entre si 
tipos distintos de datos 

El compilador, al traducir nuestro pro- 
grama, vigila que no intentemos guardar, 
por ejemplo, un número entero en una 
variable de tipo CHAR, y avisa en su caso 
de la presencia de un error. 

Otra posibilidad muy interesante es la 
de limitar los valores que pueda tomar 
una variable. Así, si intentáramos guardar 
un valor fuera de los límites establecidos, 
se produciría un error. Para hacer esto, 
en lugar del nombre del tipo se escriben 
el valor límite inferior y el superior sepa- 
rados entre sí por un par de puntos: 

var 

Edad :0..110; 
Peso : 0..200; 
Inicial : »A\.T; 

De esta manera, Edad sólo podría 
guardar números entre 0 y 1 10 e Inicial 
sólo letras de la A a la Z. 
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Por supuesto, podríamos utilizar cons- 
tantes declaradas previamente para de- 
finir los límites: 

const 
EdadMaxIma = 110; 
PesoMaxImo ■ 120; 

var 

Edad : 0. JdadMaxIma; 
Peso : 0.. PesoMaxImo; 
Inicial : 'AVFj 



NOTA: No con todos los compiladores 
se produce siempre el control de límites; 
a menudo es opcional. Por otra parte, a 
veces se consigue una disminución de la 
cantidad de memoria necesaria para 
una variable al limitar sus valores. 




Instrucciones de programa 



- 



Una vez que tenemos declaradas las 
constantes y variables que vamos a utili- 
zar, hay que indicar qué es lo que que- 
remos hacer, y eso se consigue por me- 
dio de instrucciones que se escriben una 
detrás de otra, separadas entre sí por 
punto y coma, tras la zona de declara- 
ción de datos y entre las palabras reser- 
vadas BEGIN y END (con punto final, no lo 
olvidemos). 

Hay dos tipos básicos de Instrucciones: 

— Las que hacen algo con los datos: 
leerlos de teclado, sacarlos por la pan- 
talla o impresora, generar nuevos datos 
a partir de otros, etc. 

— Las que sirven para regular cuáles, 
cuándo y cuántas veces ejecutar las ins- 
trucciones del grupo anterior. 

Vamos a empezar por las Instrucciones 
que sirven para mostrar datos. 



US Instrucciones de salida 

Si quisiésemos mostrar por la pantalla 
el número -17, como Internamente se 



guarda en la memoria usando un código 
especial, lo primero que tendríamos que 
hacer es deducir qué caracteres son los 
que hay que mostrar para que nosotros 
nos enteremos (un signo menos, un uno y 
un siete); a continuación habría que ma- 
nejar la parte del ordenador encargada 
del control de la pantalla para que los 
presentase. 

Afortunadamente, en PASCAL existen 
unos «procedimientos» o conjuntos de 
instrucciones ya preparados que hacen 
todo esto, de manera que no hay que 
preocuparse de esas cuestiones y basta 
con utilizar el nombre del procedimiento. 

Uno que ya conocemos es WRITELN. 
Para utilzarlo, se escribe su nombre segui- 
do de la lista de las diferentes cosas que 
queremos que aparezcan, separadas 
entre sí por comas; la lista debe ir entre 
paréntesis: 



program Escritor; 

const Ene = -17; 
begin 

writeln ('Esto es una frase.' , 
Ene, '/Esto es otra. ',2'Ene) 

end. 




Este programa sacará por la pantalla: 



Esto es una frase. -17/ Esto es otra. -34 

En general, el tipo de cosas que se 
pueden mostrar son: 

— Constantes numéricas o textos: 
writeln (14, 'Avión') 

— Constantes declaradas: 
writeln (Ene) 

— El valor de una variable: 
writeln (Peso) 

— El resultado de cálculos matemáti- 
cos: writeln (2 ' Ene) 
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HISTORIA 

DEL LENGUAJE C 



EL lenguaje de progra- 
mación C fue de- 
sarrollado por Dennls 
Ritchie, de los Labo- 
ratorios Bell, en la dé- 
cada de los setenta, 
cuando trabajaba, 
junto con Ken Thomp- 
son, en el diseño del sistema operativo 
UNIX. 

El UNIX surgió por la necesidad de dis- 
poner de un sistema operativo potente 
que pudiese funcionar en pequeños or- 
denadores de propósito general. Esto dio 
lugar a que Ken Thompson desarrollara 
una primera versión de un pequeño siste- 
ma operativo, al que denominó UNIX, es- 
crito en lenguaje ensamblador, siendo 
revisado posteriormente esta primera 
versión en un nuevo lenguaje de progra- 
mación «lenguaje B», desarrollado a su 
vez por Ken Thompson. 

El lenguaje B fue ampliado por Dennis 
Ritchie, el cual obtuvo una nueva versión 
a la que llamó «lenguaje C». 

El momento actual del hardware, con 
el desarrollo de microordenadores de 
16 bits que poseen la misma potencia 
que los miniordenadores de hace unos 
años, ha favorecido el uso del sistema 
operativo UNIX y el lenguaje C. 

El lenguaje C se está transformando a 
pasos gigantescos en una de las bases 
de programación más importantes y po- 
pulares. 





Características 
ra fundamentales de C 

El C es hoy día el lenguaje por excelen- 
cia de los miniordenadores que trabajan 
bajo el sistema operativo UNIX. 

Pero no solamente se trabaja con C en 
miniordenadores y grandes sistemas. Ac- 
tualmente se dispone en el mercado de 
compiladores del lenguaje C para orde- 
nadores personales. 





C puede utilizarse en ordenadores personales. 



C es un lenguaje de programación de 
propósito general que produce «progra- 
mas compactos» y «eficientes». 



flAI 




C ha adquirido una , 



í Los programas escritos en C ocupan menos es- 
pacio. 

El diseño de programas en C puede lle- 
varse a cabo bajo técnicas de programa- 
ción estructurada (diseño "topdown") 
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su 




C posee las estructuras básicas de la programa- 
clon estructurada. 



incorporando estructuras de control bá- 
sicas como DO, UNTIL, WHILE, SWITCH e IF- 
THEN-ELSE. Los aficionados a la programa- 
ción reconocerán este tipo de estructu- 
ras comunes, en gran medida, a otros 
lenguajes tales como el Pascal. 





C es fácil de aprender. 



C permite crear programas fáciles de 
modificar y de adaptar a nuevos ordena- 
dores. Su «portabilidad» le hace el len- 
guaje idóneo para que programas en C 
escritos en un sistema puedan ejecutar- 
se en otros con modificaciones mínimas. 





C es portátil. 



Hoy día existen compiladores C para 
unos 40 sistemas, abarcando desde mi- 
croprocesadores de 8 bits hasta el su- 
perrápido Crayl. 



Otra característica a resaltar del C es 
su «potencia» y «flexibilidad». El sistema 
operativo UNIX esta escrito, en su mayor 
parte, en lenguaje C. También existen 
cantidad de compiladores en el merca- 
do desarrollados bajo C , entre los que 
podríamos mencionar Pascal, Lisp, Logo, 
Basic, etc. 




C es potente. 





C es flexible. 



"A, 




El sistema operativo UNIX está escrito en C. 



Para los estudiosos de los diferentes 
lenguajes de programación diremos que 
C posee ciertas estructuras afines al Pas- 
cal, la sencillez del Basic y en ciertos as- 
pectos llega a niveles tan bajos de la má- 
quina que podemos decir que estamos 
trabajando con ensamblador (icasl 
nadal). 

En resumen, las características princi- 
pales a destacar del lenguaje C son: 

— Producir programas reducidos (có- 
digo compacto). 

— Producir programas eficientes. 

— Ser un lenguaje portátil, potente y 
flexible. 



— Servir de base para el desarrollo de 
compiladores de otros lenguajes de pro- 
gramación. 

— Aprovechar las ventajas de la pro- 
gramación estructurada. 

— Ser de gran utilidad para estudian- 
tes y profesionales. 

— La Instalación es económica. 

— Herramienta óptima para el diseño. 

— Utilización en áreas tan extensas 
como los paquetes software, la gestión, 
los minis y microordenadores y los jue- 
gos, entre otros. 




Algunas características de C. 




C reduce los gastos de Instalación. 





Utilización de C. 



|gi La escritura de programas 
fcJ en C y su compilación 

Los lenguajes de programación, en ge- 
neral, están basados en lenguajes "intér- 
pretes" y lenguajes "compilados". Entre 
los primeros podemos citar el LOGO y el 
BASIC, perteneciendo al segundo grupo 
de los llamados compilados lenguajes 
tales como el FORTRAN, PASCAL y C. 

La primera fase para escribir un progra- 
ma en C es disponer de un editor de pro- 
pósito general, ya que el C no dispone 
de uno propio, para empezar a escribir 
su programa. Su ordenador dispondrá de 
un editor para realizar esta tarea. Si pre- 
fiere utilizar un editor distinto del que dis- 
pone su sistema, puede recurrir a proce- 
sadores de texto tan conocidos como el 
Wordstar utilizando la opción N (opción 
de "no documento"). Una vez escrito su 
programa, debe darle un nombre recor- 
dando que debe terminar con c, como, 
por ejemplo: 

prog.c 
hola.c 

En un sistema UNIX el editor podría ser 
Invocado tecleando ed, ex, edlt, emacs, 
o vi. Los ordenadores personales dispo- 
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nen de editores tales como edlin, ed, 
Wolkswrlter, etc. 

Una vez escrito su programa, éste debe 
compilarse por medio del compilador de 
C, cuya misión es detectar si su progra- 
ma posee algún error y, en caso de no 
existir ninguno, traducirlo al lenguaje que 
entiende la máquina, es decir, el código 
objeto. La traducción de su programa lo 
colocará en un nuevo fichero. Bastará in- 
vocar el nombre de este último fichero 
para que nuestro programa se ejecute. 

Veamos un ejemplo: 

# include <stdlo.h> 
main ( ) 

printf ("Este es mi primer programa en 

cyy, 

} 

Este texto que hemos tecleado, gracias 
al editor, se guardaría en un fichero y se 
compilaría dando como resultado un fi- 
chero que al ser Invocado ejecutaría 
nuestro programa. 

En el sistema UNIX, el compilador de C 
se denomina ce, por lo que para compi- 
lar nuestro programa bastaría teclear: 



ce nombre de mi programa 

Terminada la compilación observaría- 
mos que se ha creado un nuevo fichero 
llamado a.out. Tecleando dicho nombre 
nuestro programa se ejecutaría apare- 
ciendo en pantalla el siguiente texto: 

Este es mi primer programa en C. |Era 
de esperar! 

Para ordenadores personales existe 
una versión de compilador de C llamada 
Laticce C. Los pasos que daremos para 
ejecutar nuestro programa serán los si- 
guientes: 

md nombre de mi programa 
mc2 nombre de mi programa 
llnk c nombre de m( programa 



Este último paso originará un fichero lla- 
mado nombre de mi programa.exe y si a 
continuación tecleamos nombre de mi 



programa.exe conseguiremos ejecutar 
nuestro programa. 

La estructura en general de un programa 
C sería: 



PROGRAMA C 



L DEFINICION I 
VARIABLE^^I 



GRUPO DE 
SENTENCIAS 




GRUPO DE 
SENTENCIAS 



Elementos del lenguaje C 



El lenguaje C soporta los siguientes ti- 
pos de datos: 

— Caracteres. 

— Enteros. 

— Números en coma flotante. 

— Funciones. 

— Arrays y punteros. 

— Estructuras. 

— Uniones. 

Operadores tales como: 

— Aritméticos. 

— Relaciónales. 

— Lógicos. 

— Manejo de bits. 

— Asignación. 

— Condicional. 

— Acceso a datos. 



Estructuras de control tales como: 

— Sentencias. 

— Sentencia «If-Then-Else». 

— Sentencia «switch». 

— Saltos y etiquetas. 

Tipos de constantes tales como: 

— Enteros: dígitos numéricos. 

— Números en coma flotante (carac- 
teres y constantes alfanumérlcas). 

Funciones de entrada/salida, que for- 
man parte de la librería estándar del C, 
y entre otras citaremos: 




— getchar. 

— prlntf. 

— etc. 



n 



APLICACIONES 

INTRODUCCION 



^ UANDO nos enfrentá- 
is ^% mos con un problema 
■ que debemos resol- 

M m ver mediante un or- 
denador de modo in- 

v J mediato, pensamos 

/ en un algoritmo que, 
" traducido en un pro- 

grama, nos lleve a la solución. Pero esta 
forma de enfocar la resolución de pro- 
blemas mediante ordenador presenta 
dos Inconvenientes graves para un usua- 
rio de tipo medio: 

— Por cada problema distinto a resol- 
ver deberíamos tener un programa que 
nos lo solucionara, con la consiguiente 
acumulación de programas de funciona- 
miento y manejo dispar. 

— Muchas veces la inexistencia de 
programas específicos para una serle de 
problemas determinados lleva consigo 
que el usuario deba crear por sí mismo o 
encargar a una empresa especializada 
un programa para resolverlo. 

Normalmente el usuario no es un exper- 
to en Informática, sino que, simplemente, 
debe utilizar un ordenador en su activi- 
dad diaria para resolver una serie de pro- 
blemas. 

Por ello, lo que en estos casos debe 
preocupar y ocupar su tiempo es en re- 
solver el problema, no en cómo decirle 
al ordenador cómo resolverlo. 

Para ello, desde hace algún tiempo es- 
tán apareciendo en el mercado una se- 
rie de programas de uso general, que lla- 
maremos aplicaciones, que permiten 



concentrarse en la resolución del proble- 
ma sin necesidad de programar el orde- 
nador, ni de conocimientos específicos 
sobre Informática. 

Estas aplicaciones están diseñadas de 
tal forma que con ellas es posible abar- 
car todo el espectro de necesidades 
más usuales en la actividad diaria con un 
ordenador, eludiendo la mayoría de las 
veces el uso de programas específicos. 
De hecho un usuario no tiene por qué uti- 
lizar más que tres o cuatro programas de 
uso general. 



j PROBLEMA | _ 



PROGRAMA 




1 PROBLEMA ""I 
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PROGRAMA | 


1 




Las aplicaciones permiten resolver más de un 
problema. 



Tipos de aplicaciones 

Dentro del conjunto de aplicaciones 
disponibles en el mercado podemos ha- 
cer la siguiente división: 




Procesadores de texto 



Estos programas nos permiten crear y 
editar textos, como cartas, memorán- 
dums, etc. 

De hecho, transforman un ordenador 
en una máauina de escribir muy sofistica- 
da, con unas posibilidades Impensables 
en cualauier otro tipo de máquina de es- 
cribir. Los procesadores de texto nos per- 
miten componer, poner márgenes, corre- 
gir de forma interactiva el texto y un 
montón más de posibilidades de edi- 
ción. 

Con un procesador de textos pueden 
crearse una serie de cartas personaliza- 
das con la ayuda de una base de datos, 
para así realizar una circular a unos clien- 
tes, por ejemplo. 

De entre los procesadores de texto, sin 
duda el más conocido es el WORDSTAR, 
del que hay innumerables versiones para 
casi todos los ordenadores. 



Otros procesadores de texto muy co- 
nocidos son: 

— LOCOSCRIPT. 

— MICROSOFT WORD. 

— WRITING ASSISTANT. 

— PERSONAL EDITOR. 

— EASY WRITER. 

— WORD PERFECT. 




Hojas de cálculo 



Las llamadas "hojas de cálculo" son 
unas aplicaciones que permiten realizar 
de forma sencilla cualquier tipo de cálcu- 
lo en el cual Intervengan tablas de nú- 
meros y relaciones numéricas entre ellos. 
Su propiedad fundamental es la de la 
"actualización automática", que consis- 
te en que si cambiamos el valor de un nú- 
mero todos los valores y fórmulas relacio- 
nados con él se actualizarán, de forma 
automática, permitiendo con ello cana- 
lizar situaciones y proyectos, modelos de 
acumulación de situaciones reales. 

Su uso más frecuente consiste en cálcu- 
los financieros y estimación de ten- 
dencias, pero con las hojas de cálculo 
actuales podemos resolver casi cual- 
quier problema de cálculo, llegando a 
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INSERTAR SI 



Movimiento de Cursor 
S car. izda. *D car. dcha. 
'A pal. izda. *F pal. dcha. 
'E Un. arr. *X lín. abajo 
— Deslizar; — 
Z línea abajo "W línea arr 
"C pant. arr *R pant. abajo 



MENU 
— Borrar— 

"G car. 

DEL car Iz 

"T pal dch 

"Y línea 



PRINCIPAL 

—Varios— 
"Tab. é Recomp. 

~V INSERTAR SI/NO 

*L Bus./sust. otra 
RETORNO fin párrafo 
"N Insertar RETORNO 
"U Cancelar comando 



—Otros Menús— 
(sólo desde Pral) 
"J Ayuda 
-Q Rápido 
"O Pantalla 
"K Bloques 
~P Impresión 



PROGRAMA DE APLICACIONES 

— Introducción a los programas de aplicación. 

— Tipos y usos de los principales programas. 

— Tratamiento de textos: WordStar. 

— Hojas de cálculo: Multiplán, Lotus 1-2-3. 

— Bases de datos: dBase II, dBase III. 

— Paquetes Integrados: Open Access, Symphony, Framework. 

1 CENTRA 2PON MI 3PON MD 4FIGTAB 5BORTAB 6RECOMP 7 VER 8SUBRAY 9NEGR 10MÓS 




Ejemplo de procesador de textos: WordStar. 
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convertirse en verdaderos "lenguajes" 
de programación. 

La Idea básica de una hoja de cálculo 
es la siguiente: 

12 3 4 




— VISICALC. 

— MULTIPLAN. 

— LOTUS 1-2-3. 

— SUPERCALC. 

— TK SOLVER! (para aplicaciones cien- 
tíficas). 



Bases de Datos 



Concepto de hoja de cálculo. 



Tenemos una matriz bidlmensional en 
la cual cada intersección de fila y colum- 
na es lo que se llama una "celda", en la 
cual puede almacenarse un valor numé- 
rico o una fórmula aue esté relacionada 
con otras celdas. De este modo pode- 
mos llegar a establecer una serie de re- 
laciones entre las celdas que nos permi- 
ten realizar los cálculos que precisemos. 

En el mercado hay muchas hojas de 
cálculo, de entre las cuales las más ex- 
tendidas son: 



Una de las utilizaciones más comunes 
de un ordenador es la de almacena- 
miento y recuperación de grandes can- 
tidades de datos, ordenados y estructu- 
rados de alguna manera determinada. 

Para este tipo de aplicaciones existen 
en el mercado las llamadas "bases de 
datos", que son programas para gestio- 
nar graves soluciones de Información de 
tal forma que podamos almacenarlos y 
recuperarlos de una forma coherente, 
practica y eficaz. 

Normalmente, los datos están almace- 
nados en algún tipo de dispositivo físico, 
siendo el más común el disco flexible, 
aunque es recomendable el uso de dis- 
cos duros de tecnología Winchester por 
su mayor velocidad de acceso. 

Las bases de datos nos permiten guar- 
dar y recuperar los datos de una forma 
determinada por medio de sistemas es- 



1 

2 
3 

4 
5 
6 
7 
8 
9 
10 
11 
12 
13 
14 
15 
16 
17 
18 



1 



ITEM#1 

ITEM#2 

ITEM#3 

ITEM#4 

ITEM#5 

ITEM#6 

ITEM#7 

ITEM#8 

ITEM#9 

ITEM#10 

ITEM#11 

ITEM#12 



TOTAL 



VENTA DE ELEMENTOS VARIOS EN LOS PRIMEROS 6 MESES 



ENERO 



FEBRERO 



MARZO 



ABRIL 



MAYO 



JUNIO 



132 
1231 
345 
5667 
343 
343 
43 
97 
23 
42221 
333 
113 



23 
56 
457 
23 
568 
123 
6789 
24 
7878 
776 
67325 
344 



214 
35 
2345 
6 

678 
12 
68 
28 
13 
7 
79 

124 



45 
456 
3456 

36 
234 
343 
568 
457 
234356 
234 
234 
234 



2342 
23 
234 
234 
234 
234 
234 
234 
353345 
66 
55 
5 



14 
386 
368 
0 
52 
246 
211715 
28 
789 
123 
456 
4645 



50891 



84386 



3604 



240653 



357240 



218830 
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Ejemplo de hoja de cálculo. Multlplán. 




APELLIDO 



DIRECCION CIUDAD 



fELEFONO 



Nievo 

Lemos 

Barroso 

Ruano 

Romero 

Gutiérrez 

Gómez 

Cueto 

Cueva* 

Lucena 



Erollla. 10 
Ayala. 96 
Lucena. 32 
Somera, 88 
Tutor, 41 
Princesa. 27 
Gran Vía, 81 
Estrella. 1 
Diagonal, 92 
Torflfos, 5 



Bilbao 

Madrid 

Rondo 

Rlvadavlo 

Linares 

Cuenca 

Cuéllar 

Lérida 

Matará 

Toledo 



Vizcaya 

Madrid 

Málaga 

Orense 

Jaén 

Cuenca 

Segovla 

Lérida 

Barcelona 

Toledo 



48025 
26001 
29033 
32017 
23010 
16016 
40020 
25041 
08005 
45009 



(94) 447 
(91) 250 

(952) 32 
(989) 47 

(953) 13 
(9Ó6) 57 
(911) 84 
(973) 38 
(93) 256 
(926) 34 



09 87 
50 13 
45 91 
62 90 
42 58 
83 49 
65 92 
97 62 
47 66 
78 91 



Ejemplo de base de datos = dBase III. 



peciales de ordenación de ficheros, y re- 
cuperar toda o una parte de la Informa- 
ción de una forma muy sencilla. 

Sin duda, la base de datos más cono- 
cida es la dBASE III, estando su uso muy 
extendido para aplicaciones de tamaño 
medio. Para aplicaciones con poco vo- 
lumen de datos existen otros programas 
como el PFS:FILE O el FILLING ASSISTANT, 
que permiten manejar los datos de una 
forma muy sencilla. 



Paquetes Integrados 



Cuando necesitamos realizar distintas 
operaciones sobre un mismo conjunto de 
datos, como cálculos, actualizaciones 
de una base de datos, necesitamos po- 



der Intercambiar los datos entre una apli- 
cación y otra con el problema de que 
muchas veces el formato de los datos de 
las aplicaciones que manejamos no son 
compatibles entre sí. Por ello se han dise- 
ñado los llamados paquetes integrados, 
que no son más que una reunión de to- 
dos los programas que hemos visto en 
una sola aplicación. Esto es, un paquete 
que reúne en una sola aplicación un pro- 
cesador de texto, una hoja de cálculo, 
una base de datos, etc. 

Estos paquetes integrados permiten re- 
solver cualquier tipo de problema sin ne- 
cesidad de recurrir a otros programas. 

De entre los paquetes integrados más 
conocidos podemos citar: 

— SYMPHONY. 

— OPEN ACCESS. 

— FRAMEWORK. 



Disco Crear Edlt 
(HOJA DE CALCULO) - 
A 
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1 
2 
3 
4 
S 
6 
7 

e 

9 
10 

íi 



Depósito anual 
Tosa de interés 
Número de depósitos 

Tasa de impuestos 

Valor futuro sin Impuestos 
Valor futuro con Impuestos 

Sin Imp. menas Imp. 



saldo 
2.000 Ptas. 
11,00 % 
20 



12J 
6' 



30,00 % 

6 Pt. 

7 Pt. 



en despacho, gafas de sol y un 
ayudarle a conseguir las dos 
ndrá de un magnífico despac 
work), 

este rectángulo para que 
ravés suyo: 



<A:;> 

<C:> 
<D:> 
<C> 



66,429 Pt. e "Q" ahora. 



(DataBase) — — 

AGENTE DIVISION SECTOR SITUACION APODO ESPECIA 



Q17 



Parcelas 



52 



Berlín 



Splke Gestión 



I 



HOJA DE CALCULO 



Doc: 



(DaiaBose) 

(HOJA DE) 
(PROCESO) 

l 2 MAY 



Ejemplo de paquete integrado. Framework. 
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